Merhaba,
aşagıdaki kodlara göre b, g, k, ve o hücrelerinden, aynı sıraya göre, boş olan ilk hücreyi buluyorum. ancak yeni bir döngü başlatmak için activecell'in sol üst köşesindeki hücrenin içindeki rakam değerine (b10 active ise a9 daki) ve ActiveCellin konumunu belirleyen cells(a,b) içindeki a ve b sayılarına ihtiyacım var. Bu hücre sürekli değişeceği için ben bunu elle giremiyorum, kodlarla bu sayıları otomatikman nasıl atayabilirim?
teşekkürler
faruk
Range("B10:B34, G10:G34,K10:K34,O10:O34").Select
Range("B10").Activate
Selection.Find(What:="", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
aşagıdaki kodlara göre b, g, k, ve o hücrelerinden, aynı sıraya göre, boş olan ilk hücreyi buluyorum. ancak yeni bir döngü başlatmak için activecell'in sol üst köşesindeki hücrenin içindeki rakam değerine (b10 active ise a9 daki) ve ActiveCellin konumunu belirleyen cells(a,b) içindeki a ve b sayılarına ihtiyacım var. Bu hücre sürekli değişeceği için ben bunu elle giremiyorum, kodlarla bu sayıları otomatikman nasıl atayabilirim?
teşekkürler
faruk
Range("B10:B34, G10:G34,K10:K34,O10:O34").Select
Range("B10").Activate
Selection.Find(What:="", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate