Soru Yapmak istediğim uygulamaya yönelik tavsiyeniz.

OğuzTürkyılmaz

Yeni Üye
Kullanıcı Bilgileri
Katılım
12 Eyl 2021
Mesajlar
263
Çözümler
1
Aldığı beğeni
30
Excel Versiyonu
Office 365 TR
Konuyu Başlatan
Merhaba Yapmak istediğim uygulamaya yönelik nette ve forumda konu başlıkları araması yaptığımda hep excel sayfasının PDF formatına dönüştürülerek kaydedilmesi seçenekleri ve çözümleri ile karşılaşıyorum. Uygulamak istediğim olay Userform da butona tılayarak Bilgisayarımın herhangi bir yerindeki bir pdf dosyasını seçebilmek ve onu excel userformun üzerinde bir alanda göstermek ve diğer bilgileri girdikten sonra userformun üstünde girdiğim numarayla ilişkilendirerek PDF dosyasını Çalışma kitabımın da içinde bulunduğu klasörün içindeki ayrı bir PDF klasörüne kaydetmekten ibaret. Bu işlem için konu başlığı yada varsa link paylaşmanızı rica ederim.
 

Adnan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
1,513
Çözümler
266
Aldığı beğeni
1,529
Excel Versiyonu
Office 365 TR
CSS:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
kayıt için bunu deneyin. bu prosedürü çağırmak için üstteki kodun end sub üzerine kaydet path yazmayı unutmayın
 
Son düzenleme:

OğuzTürkyılmaz

Yeni Üye
Kullanıcı Bilgileri
Katılım
12 Eyl 2021
Mesajlar
263
Çözümler
1
Aldığı beğeni
30
Excel Versiyonu
Office 365 TR
Konuyu Başlatan
CSS:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
kayıt için bunu deneyin. bu prosedürü çağırmak için üstteki kodun end sub üzerine kaydet path yazmayı unutmayın
Adnan Bey seçtiğim PDF dosyasını masaüstümdeki kt grup klasörü içinde bulunan pdf adlı klasöre kaydetmek istiyorum. Bu yolu isim = Right(path, Len(path) - InStrRev(path, "\"))kodundaki path, "\" çift tırnakların arasına yazmak gerekmiyor mu. Ben yazdığınız ilk kod grubu ile bunun arasında koptum. Yazılan Prosedürü çağırmak için sadece prosedürün adını kullanmıyormuyuz kaydet path yazın demişsiniz. Kafam bayağı karıştı.
 

Adnan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
1,513
Çözümler
266
Aldığı beğeni
1,529
Excel Versiyonu
Office 365 TR
Private Sub kaydet(path As String) kaydet presuduru path isimli bir string ifade bekler. Herhangi bir yere bir şey eklemenize gerek yok excelin bulunduğu yere pdf dosyasını kaydeder
EĞER yapamazsan örnek bende hazır yükleyebilirim ama uğraşmanda fayda var. Ayrıca with 550 hatalı demiştin farklı with iptal edilmiş onları aktif yapın
 
Son düzenleme:

OğuzTürkyılmaz

Yeni Üye
Kullanıcı Bilgileri
Katılım
12 Eyl 2021
Mesajlar
263
Çözümler
1
Aldığı beğeni
30
Excel Versiyonu
Office 365 TR
Konuyu Başlatan
Private Sub kaydet(path As String) kaydet presuduru path isimli bir string ifade bekler. Herhangi bir yere bir şey eklemenize gerek yok excelin bulunduğu yere pdf dosyasını kaydeder
EĞER yapamazsan örnek bende hazır yükleyebilirim ama uğraşmanda fayda var. Ayrıca with 550 hatalı demiştin farklı with iptal edilmiş onları aktif yapın
Adnan Hocam ben kendimden ümidi kestim. Çok ilginç bir şekilde benimle aynı istekte bulunmuş bir kaç örneğe de rastladım başka excel sitelerinde ama orda da insanlar ya dosyalarını siiteye yüklemekten imtina etmişler yada bir şekilde çözümsüz kalmış sorular. İnşallah bu soru ilk burada çözüme kavuşacak :)

PDf nesnesini AcroPDF1 ve AdobePDFReaer olarak farklı isimlerle yazdım her ikisinde de gelen yanıt Empty ve
.Width = 200 satırı üzerinde hata alıyorum nesne gerekli diyor. Bu hatayı çözemediğim içinde kaydet bölümüne terfi edemedim haliyle.
 

Ekli dosyalar

  • Adobe.png
    Adobe.png
    21.5 KB · Gösterim: 4
  • Screenshot_1.png
    Screenshot_1.png
    36 KB · Gösterim: 4

Adnan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
1,513
Çözümler
266
Aldığı beğeni
1,529
Excel Versiyonu
Office 365 TR
örneğinizi ekliyorum
 

Ekli dosyalar

  • acrobatKaydet.xlsm
    47.2 KB · Gösterim: 3

Adnan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
1,513
Çözümler
266
Aldığı beğeni
1,529
Excel Versiyonu
Office 365 TR
örneği yeniledim
 

Ekli dosyalar

  • acrobatFolder.xlsm
    22.5 KB · Gösterim: 3

Adnan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
1,513
Çözümler
266
Aldığı beğeni
1,529
Excel Versiyonu
Office 365 TR
acrobat nesnesini form üzerinde yeniden ekleyin
1653239276897.png
 

Adnan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
1,513
Çözümler
266
Aldığı beğeni
1,529
Excel Versiyonu
Office 365 TR
breakpoint koyup hata verdiği yazabilirmisin
 

Adnan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
1,513
Çözümler
266
Aldığı beğeni
1,529
Excel Versiyonu
Office 365 TR
zipten .çıkar çift tıkla çalıştır
Sonra Dosya/secenekler/güven merkezi/güven merkezi ayarları ve resimdeki gibi yapın
1653240863118.png
 

Ekli dosyalar

  • OfficeVBAFormsRegSetting.zip
    428 bayt · Gösterim: 2

Adnan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
1,513
Çözümler
266
Aldığı beğeni
1,529
Excel Versiyonu
Office 365 TR
anladım gönderdiğim zip açın ve işlemi yapın
 

OğuzTürkyılmaz

Yeni Üye
Kullanıcı Bilgileri
Katılım
12 Eyl 2021
Mesajlar
263
Çözümler
1
Aldığı beğeni
30
Excel Versiyonu
Office 365 TR
Konuyu Başlatan

Ekli dosyalar

  • Screenshot_6.png
    Screenshot_6.png
    25.9 KB · Gösterim: 2
  • Screenshot_4.png
    Screenshot_4.png
    26.9 KB · Gösterim: 2
  • Screenshot_5.png
    Screenshot_5.png
    27.8 KB · Gösterim: 2

Adnan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
1,513
Çözümler
266
Aldığı beğeni
1,529
Excel Versiyonu
Office 365 TR
form üzerine koyduğunuz acrobat nesnesinin adı acropdf1 mi kontrol edin
 

Adnan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
1,513
Çözümler
266
Aldığı beğeni
1,529
Excel Versiyonu
Office 365 TR
dosyayı sıfırdan yapın kodları kopyala yapıştır yapın
 

OğuzTürkyılmaz

Yeni Üye
Kullanıcı Bilgileri
Katılım
12 Eyl 2021
Mesajlar
263
Çözümler
1
Aldığı beğeni
30
Excel Versiyonu
Office 365 TR
Konuyu Başlatan
dosyayı sıfırdan yapın kodları kopyala yapıştır yapın
Sıfrdan yeni excel çalışma sayfası açtım controlsden adobe browser... tikledim. Nesneyi seçip formun üzerinde açmak istediğimde eleman bulunamdaı hatası verdi..
 

Ekli dosyalar

  • Screenshot_4.png
    Screenshot_4.png
    51 KB · Gösterim: 3
  • Screenshot_5.png
    Screenshot_5.png
    23.2 KB · Gösterim: 3

Adnan

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
1,513
Çözümler
266
Aldığı beğeni
1,529
Excel Versiyonu
Office 365 TR
team viewer varsa ip ve şifreyi verin kontrol edeyim bunu çözelim
 

Konuyu okuyanlar

Üst