Arkadaşlar bana bilgisayarı öğreten ustamın uzaktan eğitim ile yaptığı yüksek lisansı ödevidir. Excel makrolar ve bu konuda bilgim yok. Biraz araştırdım ama birşey bulamadım. Yardımlarınızı bekliyorum teşekkürler.
1- Aşağıdaki fonksiyonu excel de çalışacak şekilde yazınız ve deneyiniz
Public Function dortislem(sayı1, sayı2, komut)
If komut = "topla" Then
dortislem = sayı1 + sayı2
End If
If komut = "çıkarma" Then
dortislem = sayı1 - sayı2
End If
If komut = "çarpma" Then
dortislem = sayı1 * sayı2
End If
If komut = "bölme" Then
dortislem = sayı1 / sayı2
End If
End Function
2- Aşağıdaki makroyu excel de çalışacak şekilde yazınız ve deneyiniz
Sub deneme()
Range("a1").Value = dortislem(10, 10, "topla")
End Sub
Public Function dortislem(sayı1, sayı2, komut)
If komut = "topla" Then
dortislem = sayı1 + sayı2
End If
If komut = "çıkarma" Then
dortislem = sayı1 - sayı2
End If
If komut = "çarpma" Then
dortislem = sayı1 * sayı2
End If
If komut = "bölme" Then
dortislem = sayı1 / sayı2
End If
End Function
3- Aşağıdaki form’ u dizayn edin ve programı yazın, programda bir hata var (hücrelere yazma hatasını). Bu hatayı düzeltiniz?

Private Sub ComboBox1_Change()
TextBox1.Text = ComboBox1.ListIndex
End Sub
Private Sub CommandButton1_Click()
Dim hucre As String
a = ComboBox1.ListCount
Range("b2").Value = a
ComboBox1.ListIndex = 2
hucre = "c" + Str(1)
Range("b2").Value = hucre
Range("b3").Value = ComboBox1.Value
For I = 1 To a Step 1
hucre = "c" + Str(I)
ComboBox1.ListIndex = I - 1
'hucre = InputBox("gir")
Range(hucre).Value = ComboBox1.Value
Next I
End Sub
Private Sub UserForm_Activate()
ComboBox1.AddItem (Sayfa1.Range("a1").Value)
ComboBox1.AddItem (Sayfa1.Range("a2").Value)
ComboBox1.AddItem (Sayfa1.Range("a3").Value)
End Sub
4- Sanal memory nedir açıklayınız?
5- Önbellek nedir ve işlevini açıklayınız
6- Gerçek mod(real), 16-bit korumalı(protected mode), 32-bit korumalı mode ların kullanımlarını açıklayınız
7- Very tabanında kullanılan very modelleri nelerdir kısaca bilgi veriniz?
1- Aşağıdaki fonksiyonu excel de çalışacak şekilde yazınız ve deneyiniz
Public Function dortislem(sayı1, sayı2, komut)
If komut = "topla" Then
dortislem = sayı1 + sayı2
End If
If komut = "çıkarma" Then
dortislem = sayı1 - sayı2
End If
If komut = "çarpma" Then
dortislem = sayı1 * sayı2
End If
If komut = "bölme" Then
dortislem = sayı1 / sayı2
End If
End Function
2- Aşağıdaki makroyu excel de çalışacak şekilde yazınız ve deneyiniz
Sub deneme()
Range("a1").Value = dortislem(10, 10, "topla")
End Sub
Public Function dortislem(sayı1, sayı2, komut)
If komut = "topla" Then
dortislem = sayı1 + sayı2
End If
If komut = "çıkarma" Then
dortislem = sayı1 - sayı2
End If
If komut = "çarpma" Then
dortislem = sayı1 * sayı2
End If
If komut = "bölme" Then
dortislem = sayı1 / sayı2
End If
End Function
3- Aşağıdaki form’ u dizayn edin ve programı yazın, programda bir hata var (hücrelere yazma hatasını). Bu hatayı düzeltiniz?

Private Sub ComboBox1_Change()
TextBox1.Text = ComboBox1.ListIndex
End Sub
Private Sub CommandButton1_Click()
Dim hucre As String
a = ComboBox1.ListCount
Range("b2").Value = a
ComboBox1.ListIndex = 2
hucre = "c" + Str(1)
Range("b2").Value = hucre
Range("b3").Value = ComboBox1.Value
For I = 1 To a Step 1
hucre = "c" + Str(I)
ComboBox1.ListIndex = I - 1
'hucre = InputBox("gir")
Range(hucre).Value = ComboBox1.Value
Next I
End Sub
Private Sub UserForm_Activate()
ComboBox1.AddItem (Sayfa1.Range("a1").Value)
ComboBox1.AddItem (Sayfa1.Range("a2").Value)
ComboBox1.AddItem (Sayfa1.Range("a3").Value)
End Sub
4- Sanal memory nedir açıklayınız?
5- Önbellek nedir ve işlevini açıklayınız
6- Gerçek mod(real), 16-bit korumalı(protected mode), 32-bit korumalı mode ların kullanımlarını açıklayınız
7- Very tabanında kullanılan very modelleri nelerdir kısaca bilgi veriniz?