Autofill Yöntemini aynı anda birden fazla sütuna uygulama hk.

[OoParadiSeoO]

Arkadaşlar merhaba,

Range("A2").AutoFill Destination:=Range("A2:A" & [B65536].End(3).Row), Type:=xlFillDefault

Yukarıdaki komut ile A2 hücresindeki değeri B sütunundaki son değere kadar uygulayabiliyoruz. Bu işlemi sadece A sütununa değilde A,B,C,D sütunlarına aynı anda kodu tekrar tekrar yazmadan nasıl uygulatabiliriz?

 

[hamitcan]

Böyle deneyin.

Range("A2:d2").AutoFill Destination:=Range("A2:d" & [B65536].End(3).Row), Type:=xlFillDefault

 

[OoParadiSeoO]

Hamit Bey çok teşekkürler..