• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Makro' ne işe yarar ?

Katılım
5 Eylül 2007
Mesajlar
1,247
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
 
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.
 
Hücrede metin olarak takılı kalmış bilgiyi sayıya çevirmek için kullanılıyor genellikle.
 
Geri
Üst