עקסעס: מאכן לעיבעלס פון א קווערי

די אחראים: זייער נייגעריג, אחראי, thefact

אוועטאר
פויער
שר האלף
תגובות: 1036
זיך איינגעשריבען אום: פרייטאג דעצמבער 21, 2007 8:30 am
לאקאציע: אינמיטן די אידישע וועלט

עקסעס: מאכן לעיבעלס פון א קווערי

תגובהדורך פויער » פרייטאג סעפטעמבער 12, 2008 12:39 pm

למשל איך האב א טעיבל מיט קאסטומערס און איך וויל מאכן לעיבלס צו סטיקן אויף בריוון וכדומה

איך האב געגאגלט און געטראפן א קאוד איך האב געמאכט א קווערי ער עפנט ווארד אבער ער פרינט נאר די ערשטע נאמען
קען מען עס פיקסן?

קאוד: וועל אויס אלע


Function MergeIt()
   Dim objWord As Word.Document
   Set objWord = GetObject("C:\Database\labels.doc", "Word.Document")
   ' Make Word visible.
   objWord.Application.Visible = True
   ' Set the mail merge data source as the Northwind database.
   objWord.MailMerge.OpenDataSource _
      Name:="C:\Database\MyDatabase.mdb", _
      LinkToSource:=True, _
      Connection:="Query tblCustomers Query", _
      SQLStatement:="SELECT * FROM [tblCustomers Query]"
   objWord.MailMerge.Destination = wdSendToNewDocument
objWord.MailMerge.Execute

'The following line must follow the Execute statement because the
'PrintBackground property is available only when a document window i
'active. Without this line of code, the function will end before Word
'can print the merged document.

objWord.Application.Options.PrintBackground = False
objWord.Application.ActiveDocument.PrintOut
End Function
ביז אין קרעשטמע דארף מען אויך א טרונק בראנפן, וויאזוי געט מען זיך א עצה?
מען קען עס האבן ביי די אידישע וועלט...!

אוועטאר
פריץ
שר חמישים ומאתים
תגובות: 273
זיך איינגעשריבען אום: מיטוואך אוגוסט 20, 2008 5:32 pm

תגובהדורך פריץ » פרייטאג סעפטעמבער 12, 2008 1:13 pm

פארוואס פרינטסטו נישט גראד די לעבעלס פון עקסעס
גיי צי ריפארטס גיי צי NEW
גיי צי לעבל וויזארד

אוועטאר
פריץ
שר חמישים ומאתים
תגובות: 273
זיך איינגעשריבען אום: מיטוואך אוגוסט 20, 2008 5:32 pm

תגובהדורך פריץ » זונטאג סעפטעמבער 14, 2008 10:18 am

פרוביר אויס צי עס ארבעט אויב די נעמסט ארויס דעי שורה:

objWord.MailMerge.Execute

און דאס איז די גאנצע קאוד אן דעי שורה

קאוד: וועל אויס אלע

Function MergeIt()
   Dim objWord As Word.Document
   Set objWord = GetObject("C:\Database\labels.doc", "Word.Document")
   ' Make Word visible.
   objWord.Application.Visible = True
   ' Set the mail merge data source as the Northwind database.
   objWord.MailMerge.OpenDataSource _
      Name:="C:\Database\MyDatabase.mdb", _
      LinkToSource:=True, _
      Connection:="Query tblCustomers Query", _
      SQLStatement:="SELECT * FROM [tblCustomers Query]"
   objWord.MailMerge.Destination = wdSendToNewDocument


'The following line must follow the Execute statement because the
'PrintBackground property is available only when a document window i
'active. Without this line of code, the function will end before Word
'can print the merged document.

objWord.Application.Options.PrintBackground = False
objWord.Application.ActiveDocument.PrintOut
End Function

אוועטאר
פריץ
שר חמישים ומאתים
תגובות: 273
זיך איינגעשריבען אום: מיטוואך אוגוסט 20, 2008 5:32 pm

תגובהדורך פריץ » זונטאג סעפטעמבער 14, 2008 10:46 am

יעצט גיי צי די ווארד פייל גיי צי טולס גיי צי לעטערס ענד מעילינג גיי צי מעיל מערדזש
וועט ארויסקומען די וויזארד אויף די רעכטע זייט גיי אונטען און דריק ערנדזש לעבלס און דריק די באטטאן אפדעיט אלל לעבלס וועט עס גיין


ביי די וועי איך ווייסנישט פארוואס ביי מיר האט ער נישט געטראפן די אבזעקט "ווארד"
איך האב עס געדארפט אליינס דיפיינען דורך צילייגען די שורה

קאוד: וועל אויס אלע

Dim objWord As Object
Set objWord = CreateObject("Word.Application")

אוועטאר
פויער
שר האלף
תגובות: 1036
זיך איינגעשריבען אום: פרייטאג דעצמבער 21, 2007 8:30 am
לאקאציע: אינמיטן די אידישע וועלט

תגובהדורך פויער » זונטאג סעפטעמבער 14, 2008 1:22 pm

יעצט קומט ארויף די מעסעדזש
צוגעלייגטע
Untitled.jpg
Untitled.jpg (15.96 KiB) געזעהן 1827 מאל
ביז אין קרעשטמע דארף מען אויך א טרונק בראנפן, וויאזוי געט מען זיך א עצה?
מען קען עס האבן ביי די אידישע וועלט...!

אוועטאר
פריץ
שר חמישים ומאתים
תגובות: 273
זיך איינגעשריבען אום: מיטוואך אוגוסט 20, 2008 5:32 pm

תגובהדורך פריץ » זונטאג סעפטעמבער 14, 2008 1:26 pm

די קואד קען נישט ראנען אויב עקסעס איז אין דיזיין סטעיט דארפסט צימאכען די דעטעבעיס און עס סעיוון און עס צוריק עפענען

אוועטאר
פויער
שר האלף
תגובות: 1036
זיך איינגעשריבען אום: פרייטאג דעצמבער 21, 2007 8:30 am
לאקאציע: אינמיטן די אידישע וועלט

תגובהדורך פויער » זונטאג סעפטעמבער 14, 2008 1:29 pm

שכוח פריץ

אבער יעצט וויל ער פרינטן א ליידיגע פעידש
ביז אין קרעשטמע דארף מען אויך א טרונק בראנפן, וויאזוי געט מען זיך א עצה?
מען קען עס האבן ביי די אידישע וועלט...!

אוועטאר
פויער
שר האלף
תגובות: 1036
זיך איינגעשריבען אום: פרייטאג דעצמבער 21, 2007 8:30 am
לאקאציע: אינמיטן די אידישע וועלט

תגובהדורך פויער » זונטאג סעפטעמבער 14, 2008 1:45 pm

יעצט איז אקעי

אבער ער נעמט נישט ארויס די גאנצע אינפארמעישאן פון די קווערי נאר די לעצטע שורות די סיטי מיט די זיפ קאוד
ביז אין קרעשטמע דארף מען אויך א טרונק בראנפן, וויאזוי געט מען זיך א עצה?
מען קען עס האבן ביי די אידישע וועלט...!


צוריק צו “מייקראסאפט עקסעל / עקסעס”

ווער איז אונליין

באנוצערס וואס דרייען זיך דא: נישטא קיין איינגעשריבענע באנוצערס און 3 געסט