excel vba yardım

minEvoRise

Süper Üye

Süper Üye

Mesajlar

2,349

• 24 Eylül 2021

• #1

sonsatir = Sheets("BİLGİLER").Cells(65536, "c").End(xlUp).Row

For Each hucre In [D4:AH33]
hucre.Value = "-"
Next

Yukarıdaki formül çalışıyor. Ama benim AH33 değil de AH(sonsatir) a ihtiyacım var.
Bunu nasıl yaparım.

 

Buzkırıcı

Hiperaktif Üye

Hiperaktif

Mesajlar

4,920

• 24 Eylül 2021

• #2

Bu konuyu çok iyi anlatan bir web sitesi var mı takip etmek istiyorum.
İşlem tablosu programlama dersim var

 

yakuphan

Hiperaktif Üye

Hiperaktif

Mesajlar

4,627

• 24 Eylül 2021

• #3

For Each hucre In Range("D4:AH" + sonsatir).Cells
olarak dener misiniz?

 

yakuphan

Hiperaktif Üye

Hiperaktif

Mesajlar

4,627

• 24 Eylül 2021

• #4

Buzkırıcı' Alıntı:

Bu konuyu çok iyi anlatan bir web sitesi var mı takip etmek istiyorum.
İşlem tablosu programlama dersim var

Genişletmek için tıkla ...

Bu konuyu dediğiniz Excel'de VBA konusunu mu? Excel.web.tr güzel bir forum sitesi.

 

Buzkırıcı

Hiperaktif Üye

Hiperaktif

Mesajlar

4,920

• 25 Eylül 2021

• #5

Evet hocam makrolar, vba...

 

mokumus67

Seçkin Üye

Seçkin Üye

Mesajlar

313

• 25 Eylül 2021

• #6

Sub Deneme()
sonsatir = Sheets("BİLGİLER").Cells(65536, "c").End(xlUp).Row
Range("DH4:AH" & sonsatir)= "-"
End Sub

Burda döngüye gerek yok.

 

minEvoRise

Süper Üye

Süper Üye

Mesajlar

2,349

• 25 Eylül 2021

• #7

mokumus67' Alıntı:

Sub Deneme()
sonsatir = Sheets("BİLGİLER").Cells(65536, "c").End(xlUp).Row
Range("DH4:AH" & sonsatir)= "-"
End Sub

Burda döngüye gerek yok.

Genişletmek için tıkla ...

Çok teşekkür ederim @mokumus67 hocam. İşimi gördü.