AccessTr.neT
Worde aktarda yapmam gereken son iş - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Worde aktarda yapmam gereken son iş (/konu-worde-aktarda-yapmam-gereken-son-is.html)

Sayfalar: 1 2 3 4


Cvp: Worde aktarda yapmam gereken son iş - MESUTTR - 13/04/2014

üstad olumlu teşekkür ederim eline sağlık
alt forum olunca bütün kodlar değişiyor değil mi?
ancak ben sonuncuyu "ve" bağlacıyla bağlayacaktım
mesela ürünler iki tane ise :ekmek ve su
ekmek,un ve su gibi
o nasıl olur bu düzende..
çünkü iki den fazla ürün girdiğimde yine üçünün arasına virgül koyuyor
şunun gibi,
ekmek,un,su
benim yapmaya çalıştığım
ekmek,un ve su
ekemek,un,su ve çay


Cvp: Worde aktarda yapmam gereken son iş - POWER - 13/04/2014

Eklendi...


Cvp: Worde aktarda yapmam gereken son iş - MESUTTR - 13/04/2014

teşekkür ederim üstad,
elinize, aklınıza sağlık
ben den isteğiniz var mı? sizin için yapabileceğim
darlaydıysam affola
ozanakkaya üstada selam
benden istediğiniz yoksa bunu kedi veritabanıma uyglamaya çalışacam


Cvp: Worde aktarda yapmam gereken son iş - POWER - 13/04/2014

Problem olursa burdayız...Accesstr.Net


Cvp: Worde aktarda yapmam gereken son iş - MESUTTR - 13/04/2014

sayın power ve ozanakkaya
üstadım son haliyle kendi veritabanıma uygulamaya çalıştım.
bu sefer boş bir word belgesiyle tarafınıza gönderiyorum(kurum bilgi paylaşmaya müsait değil word belgesi o yüzden boş)ama imleri ayarladım
problemim anladığım kadarıyla kedi veri tabanıma uyarlamaya çalıştım
ancak şöyle bir hata aldım
User-defined type not defined
Private sub olustur1_click() sarı gösteriyor
Dim WordApp As Word.Application
yardımcı olurmusunuz
birde bir şey sormak istiyorum
mesela dosyano kısmını ben
birinci dosya no-ikincidosya-üçüncü dosyano
buşekilde uyarlamak istiyorum ama kodların içinden ayrıştıramadım
bir tane varsa birşey yok tamam
ancak birde fazla ise dosyanumarları arasına sürekli tire koyocak(-)
virgül gelmemli(,) veya bağlaç dosya numaraları kısmını nasıl tanımlarım


Cvp: Worde aktarda yapmam gereken son iş - ozanakkaya - 14/04/2014

User-defined type not defined hatasını gidermek için referanslara "Microsoft Word Object Library" referansını ekleyiniz.

Dosyano olayı için

If Mid(Dosyano, I, 1) = "," Then

kodundaki "," yerine "-" yazmalısın.