Merhaba,
VBA üzerinde çalışmaya yeni başladım. Bir proje için çok sayıda PDF oluşturmam gerekiyor. Oluşturduğum form M2 hücresindeki sayıya göre değişiyor.
Bilgisayarda takılma olmaması için PDF oluşturma arası 5-10 saniye gibi bekleme koymam gerekiyor. Aşağıdaki gibi bir şey yazmaya çalıştım ama başaramadım.
Yardımcı olabilir misiniz?
VBA üzerinde çalışmaya yeni başladım. Bir proje için çok sayıda PDF oluşturmam gerekiyor. Oluşturduğum form M2 hücresindeki sayıya göre değişiyor.
Bilgisayarda takılma olmaması için PDF oluşturma arası 5-10 saniye gibi bekleme koymam gerekiyor. Aşağıdaki gibi bir şey yazmaya çalıştım ama başaramadım.
Yardımcı olabilir misiniz?
Kod:
Sub Test()
If Sheets("SA FORM").Range("M2").Value <> Sheets("SA FORM").Range("O2").Value Then
Call PDF
End If
Application.Wait (Now + TimeValue("0:00:5"))
If Sheets("SA FORM").Range("M2").Value <> Sheets("SA FORM").Range("O2").Value Then
With Sheets("SA FORM")
.Range("M2").Value = .Range("M2").Value + 1
End With
End If
End Sub