Çok eski bir web tarayıcısı kullanıyorsunuz. Bu veya diğer siteleri görüntülemekte sorunlar yaşayabilirsiniz.. Tarayıcınızı güncellemeli veya alternatif bir tarayıcı kullanmalısınız.
Sayfa1 de bulunan C4 "degisken" degerini yaninda bulunan dugmelere bastigimda, Sayfa2deki sari renkli olan hucrelere nasil sabit deger olarak atama yapabilirim?
Sub Makro1()
Range("c4").Select
Selection.Copy
Sheets("Sayfa2").Select
a = Sheets("sayfa2").Cells(Rows.Count, 2).End(xlUp).Row
If a = 1 Then
Cells(1, 1).Select
ActiveSheet.Paste
[f3] = [f3].Value
Else
Cells(c + 6, 3).Select
ActiveSheet.Paste
End If
Application.CutCopyMode = False
Cells(c + 5, "f") = Cells(c + 5, "f").Value
Sheets("sayfa1").Select
[a1].Select
End Sub
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.