• DİKKAT

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

Yurtdışına gönderdiğim excel çalışmıyor

  • Konbuyu başlatan Konbuyu başlatan kneehot
  • Başlangıç tarihi Başlangıç tarihi
Katılım
4 Ekim 2007
Mesajlar
632
Excel Vers. ve Dili
OFFİCE 365
Arkadaşlar merhaba. İçinde makroda bulunan bir excel dosyasını yurtdışına gönderdim orda açtıklarında excel tam çalışmıyor. Aşağıya eklediğim makro kütüphanede yok diyerek hata veriyor. ayrıca metneçevir fonksiyonu ile tarihi yazıya çevirdiğim formülde düzgün çalışmıyor. Yardımcı olursanız çok sevinirim bütün işim durdu şu anda. Şimdiden yardımlara çok teşekkürler.

Sub Arttir_yaz()

Dim i As Long

Range("F2").ClearContents

If Range("I2") < 1 Or Range("I1") < 1 Then Exit Sub
If IsNumeric(Range("AV2")) = False Or _
IsNumeric(Range("AV1")) = False Then Exit Sub

If Range("I2") <= Range("I1") Then Exit Sub

For i = Range("I1").Value To Range("I2").Value
Range("F2") = i
Call yazdir
saniye = Range("F3") / 100000
Application.Wait (Now + saniye)
Next i

End Sub

kırmızı ile boyadığım range yi işaretliyip hata veriyor.
 
Yerinde incelemek gerekir.
TeamViewer uzaktan bağlantı bilgileri verilirse yerinde inceleyip çözüm sunabilirim.
 
saniye = Range("F3") / 100000

- F3 hücresine yazılı formatı yurtdışındaki kullanım şekline göre düzenleyin.
- Sheets("Sayfa1").Range("F3") / 100000 gibi düzenleyin.

Kolay gelsin.
 
Geri
Üst