Makro' ne işe yarar ?

igultekin2000

Altın Üye
Katılım
5 Eylül 2007
Mesajlar
1,236
Excel Vers. ve Dili
ofis 2010
iyi akşamlar; daha önce kullandığım makro idi, nasıl ve ne işe yaradığını unutmuşum. Teşekkürler
Kod:
Sub f2_enter()
Application.Calculation = xlCalculationManual
    Sayfa1.Range("e3").Select

For i = 7 To Sayfa1.Range("e" & Rows.Count).End(3).Row
    SendKeys "{F2}"
    SendKeys "{ENTER}"
    If ActiveCell.Row > Sayfa1.Range("e" & Rows.Count).End(3).Row Then Exit Sub
Next i
Application.Calculation = xlCalculationAutomatic
MsgBox "İşlem tamamlandı.", vbInformation, "RAPOR"
End Sub
 

Necdet

Moderatör
Yönetici
Katılım
4 Haziran 2005
Mesajlar
15,181
Excel Vers. ve Dili
Ofis 365 Türkçe
Merhaba,

Sanırım Formüllerde bir sıkıntı vardı ki kodlar E sütunun 7. satırından sonuncu satırına kadar formüle girip Enter tuşu ile çıkıyor.
 

igultekin2000

Altın Üye
Katılım
5 Eylül 2007
Mesajlar
1,236
Excel Vers. ve Dili
ofis 2010
Merhaba,

Sanırım Formüllerde bir sıkıntı vardı ki kodlar E sütunun 7. satırından sonuncu satırına kadar formüle girip Enter tuşu ile çıkıyor.
teşekkürler, kursorü bulmak için kullanıyordum, hayırlı akşamlar.
 

Zeki Gürsoy

Uzman
Uzman
Katılım
31 Aralık 2005
Mesajlar
4,225
Excel Vers. ve Dili
Office 2019 (64 bit) - Türkçe
Hücrede metin olarak takılı kalmış bilgiyi sayıya çevirmek için kullanılıyor genellikle.
 
Üst