[]
Excel macro yardımı
merhaba
excelde bir macro hazırlamaya çalışıyorum.
formülde vlookup kullanmam gerekiyor bir çok yerde. şöyle bir sorunum var. macroyu kullanacağım her raporda veriler değişiyor.
Range("D4").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[1]:R[315]C[1],soh!C:C[1],2,0)"
Selection.AutoFill Destination:=Range("D4:D600")
Range("D4:D600").Select
şimdi bu formülde yanlış bilmiyorsam vlookup alırken seçili alandan 315 satır aşağı kadar seçiyor.
benim istediğim kaç satır veri varsa o kadar satır aşağı insin. mesela bu raporda 315 satır var fakat bir sonraki raporda 645 veri olacak. ctrl+shift+down ile yapıyorum fakat yine de sayı olarak formül veriyor.
bunu nasıl çözerim?
excelde bir macro hazırlamaya çalışıyorum.
formülde vlookup kullanmam gerekiyor bir çok yerde. şöyle bir sorunum var. macroyu kullanacağım her raporda veriler değişiyor.
Range("D4").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[1]:R[315]C[1],soh!C:C[1],2,0)"
Selection.AutoFill Destination:=Range("D4:D600")
Range("D4:D600").Select
şimdi bu formülde yanlış bilmiyorsam vlookup alırken seçili alandan 315 satır aşağı kadar seçiyor.
benim istediğim kaç satır veri varsa o kadar satır aşağı insin. mesela bu raporda 315 satır var fakat bir sonraki raporda 645 veri olacak. ctrl+shift+down ile yapıyorum fakat yine de sayı olarak formül veriyor.
bunu nasıl çözerim?
Google'da "excel dynamic named range" diye aratabilirsin.
- archmage mahmut
(11.07.16 10:51:06)
Tam istedigim sey bu mu emin olamadım. Cok fazla da anlamıyorum macro yazmaktan.
- veritaslibertas
(11.07.16 11:14:07)
Bu macro değil, veri girdiğin sütunu tek bir hücrede tanımlıyorsun. Sonra ona isim atıyorsun. Range olarak sayı yerine atadığın ismi yazıyorsun.
- archmage mahmut (11.07.16 11:40:23)
Evet biraz cozdum offset ile yapilabiliyor sanirim ama nedense counta kismi hata veriyor bende. Uygulayamiyorum.
- veritaslibertas (11.07.16 12:05:09)
Aslinda sorunun daha farkli bir yerden kaynaklandığını anladim.
Su konuda yardimci olabilirseniz cozmus olacagim.
Bir hucreye formul uyguladığımızda hucrenin kosesine cift tikladigimizda formul aşağı kadar iniyor ya, onu macroda yapabilmem lazim. Burada formulde belirlenen alana kadsr iniyor sadece
Su konuda yardimci olabilirseniz cozmus olacagim.
Bir hucreye formul uyguladığımızda hucrenin kosesine cift tikladigimizda formul aşağı kadar iniyor ya, onu macroda yapabilmem lazim. Burada formulde belirlenen alana kadsr iniyor sadece
- veritaslibertas (11.07.16 12:49:32)
Yok, yapamiyorum. Yok mu kodu yazabilecek olan lutfen
- veritaslibertas (11.07.16 14:12:03)
Record macro diyerek ctrl + down, yaparsan vba sayfasında (alt f11) kod olarak yazıyor.
- archmage mahmut (11.07.16 14:20:37)
Istedigim sey bu degil ama. Denedim onu da
- veritaslibertas (11.07.16 14:36:14)
Selection.AutoFill Destination:=Range("D4:D600")
Range("D4:D600").Select
Kaydederken cift tikliyorum ve D600e kadar iniyor, fakat bir sonraki raporda bunun ornegin D500e kadar inmesi gerekiyor. Bunu yapamiyorum. Her raporda farkli cunku ama makro kaydet diyerek o an yapilan yerleri kaydediyor
Range("D4:D600").Select
Kaydederken cift tikliyorum ve D600e kadar iniyor, fakat bir sonraki raporda bunun ornegin D500e kadar inmesi gerekiyor. Bunu yapamiyorum. Her raporda farkli cunku ama makro kaydet diyerek o an yapilan yerleri kaydediyor
- veritaslibertas (11.07.16 14:39:56)
Yapmak istediğin şey hazır makro kaydederek olmaz. İlk önce aktif satır ve sütun sayılarını bulman lazım. Yani çalışacağın range dinamik olduğu için senin işlem yapmadan önce range'i tespit etmen gerekiyor.
Daha sonra yapacağın işlemler için ilk satırdan son satıra kadar döngü kurman lazım, ister for, ister while, ister for each kullanırsın.
Daha sonra yapacağın işlemler için ilk satırdan son satıra kadar döngü kurman lazım, ister for, ister while, ister for each kullanırsın.
- kimlanbu (11.07.16 15:39:28)
1
