Aşağıdaki kodlarla A1-A20 arasına 1'den 20'ye kadar yazdırıyorum. Kodun çalışması için A1'e 1 ve A2'ye de 2 Yazmak gerekiyor.
Soru: A1 ve A2'ye bu değerleri yazmadan, başlangıç değerleri kod içinde değişken olarak tanımlanabilir/verilebilir mi.
Teşekkürler
Kod:
Sub Doldur()
Set Kaynak = Sheets("Sayfa1").Range("A1:A2")
Set Hedef = Sheets("Sayfa1").Range("A1:A20")
Kaynak.AutoFill Destination:=Hedef
End Sub
Soru: A1 ve A2'ye bu değerleri yazmadan, başlangıç değerleri kod içinde değişken olarak tanımlanabilir/verilebilir mi.
Teşekkürler
Kod:
Sub Doldur()
Set Kaynak = Sheets("Sayfa1").Range("A1:A2")
Set Hedef = Sheets("Sayfa1").Range("A1:A20")
Kaynak.AutoFill Destination:=Hedef
End Sub