hücrede yazan yazıyı pdf isi olarak çıktı almak

Cevapla
jerfinby
Mesajlar: 2
Kayıt: Cum Eki 06, 2023 12:52 am
Adınız: nihal
Soyadınız: afşar

hücrede yazan yazıyı pdf isi olarak çıktı almak

Mesaj gönderen jerfinby »

b2 v k2 hücreleri arasındaki yazıları pdf ismi olarak kaydetmek istiyorum b2 ve k2 dahil
Bu mesaja eklenen dosyaları görüntülemek için gerekli izinlere sahip değilsiniz.
erseldemirel
Mesajlar: 78
Kayıt: Cmt Haz 24, 2023 12:23 am
Web Sitesi: https://erseldemirel.com.tr/
Adınız: Ersel
Soyadınız: Demirel

Re: hücrede yazan yazıyı pdf isi olarak çıktı almak

Mesaj gönderen erseldemirel »

Bu kodu test edin

Kod: Tümünü seç

Sub test()
Set alan = ThisWorkbook.Sheets("Sayfa1").Range("B2:K2")
Metin = ""
For Each Cell In alan
Metin = Metin & Cell.Value
Next Cell
dosya = "test.pdf"
yol = ThisWorkbook.Path & "\" & dosya
Sheets("Sayfa1").ExportAsFixedFormat Type:=xlTypePDF, Filename:=yol
End Sub

akcanadana
Mesajlar: 9
Kayıt: Cum Haz 23, 2023 6:52 pm
Lokasyon: Adana
Meslek: İşletmeci
Adınız: Atila
Soyadınız: Ballıkaya

Re: hücrede yazan yazıyı pdf isi olarak çıktı almak

Mesaj gönderen akcanadana »

PDF OLUŞTUR
Bu mesaja eklenen dosyaları görüntülemek için gerekli izinlere sahip değilsiniz.
jerfinby
Mesajlar: 2
Kayıt: Cum Eki 06, 2023 12:52 am
Adınız: nihal
Soyadınız: afşar

Re: hücrede yazan yazıyı pdf isi olarak çıktı almak

Mesaj gönderen jerfinby »

akcanadana yazdı: Cmt Eki 07, 2023 3:36 pmPDF OLUŞTUR
Hoac teşekkürler sizden bir ricam var her hücreyi değilde b2 ve k2 arasındaki rastgele 5 hücreyi yazdırmak idtiyorum bununiin ne yapmam gerekir.
Ybi b2,d2,e2, g2, ı2,k2 gibi

Set rng = ws.Range("B2:K2") ' Hedef hücre aralığını düzenleyin
Cevapla
  • Benzer Konular
    Cevaplar
    Görüntüleme
    Son mesaj