30.11.2014, 20:39
30.11.2014, 21:20
Hallo Mike,
das Entscheidende ist doch, was in den Zellen K8 und J3 steht. In der Datei aus dem Beitrag #55 von Ralf steht in K8 #NV, also in VBA der Fehler 2042, welcher eben dann moniert wird. ;)
Gruß Uwe
das Entscheidende ist doch, was in den Zellen K8 und J3 steht. In der Datei aus dem Beitrag #55 von Ralf steht in K8 #NV, also in VBA der Fehler 2042, welcher eben dann moniert wird. ;)
Gruß Uwe
30.11.2014, 21:35
Hallo Kuwer,
ja....in der Zelle K8 steht #NV
aber nur, wenn du in Zelle "K6" eine Artikelnummer angibst, die es nicht gibt.
Wenn du in Zelle "K6" diese Artikelnummer eingibst: 209901
wird in Zelle "K8" der Name des Lieferanten angezeigt und das soll der Erste Teil des Dateinamens sein, der zweite Teil ist die Zelle "J3"
#NV ist eine Meldung, von der Formel, die in der Zelle "K8" wieder gegeben wird, wenn der Wert nicht gefunden wird.
Gruß Mike
ja....in der Zelle K8 steht #NV
aber nur, wenn du in Zelle "K6" eine Artikelnummer angibst, die es nicht gibt.
Wenn du in Zelle "K6" diese Artikelnummer eingibst: 209901
wird in Zelle "K8" der Name des Lieferanten angezeigt und das soll der Erste Teil des Dateinamens sein, der zweite Teil ist die Zelle "J3"
#NV ist eine Meldung, von der Formel, die in der Zelle "K8" wieder gegeben wird, wenn der Wert nicht gefunden wird.
Gruß Mike
30.11.2014, 21:37
Hi Kuwer,
hab noch vergessen zu sagen, das auch der Fehler angezeigt wird, wenn in der Zelle der Lieferant angezeigt wird. :)
Gruß Mike
hab noch vergessen zu sagen, das auch der Fehler angezeigt wird, wenn in der Zelle der Lieferant angezeigt wird. :)
Gruß Mike
30.11.2014, 21:42
Hallo Herbert,
es liegt nicht am Code.
Teste mal folgenden Code, dann wirst Du erkennen wo der Fehler liegt.
Ich habe auch eine Rechtschreibschwäche, deshalb ist es um so wichtiger mit zwingender Variablendeklaration (Option Explicit) zu arbeiten, denn dann wirst Du schnell auf unterschiedliche Schreibweisen im Code aufmerksam gemacht. Ich habe im Code den Variablen andere Typen zugewiesen, schau es Dir genauer an.
es liegt nicht am Code.
Teste mal folgenden Code, dann wirst Du erkennen wo der Fehler liegt.
Code:
Sub SpeichernAlsPDF2()
Dim mydocument As Worksheet
Dim pdfName As String
Dim pdfPath As String
Dim Name1 As String
Dim Name2 As String
Set mydocument = Worksheets("Einkauf") 'Mappe anpassen
With mydocument
If .Range("J3") <> "" Then
If Not IsError(.Range("K8")) Then
pdfName = .Range("K8") & " order " & .Range("J3") & ".pdf"
pdfPath = "I:\" & pdfName
.ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfPath, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True
Else
MsgBox "Liferant ist nicht bekannt oder Fehler im Formelwert der Zelle K8"
End If
Else
MsgBox "Keine Bestell-Nummer eingetragen"
End If
End With
End SubIch habe auch eine Rechtschreibschwäche, deshalb ist es um so wichtiger mit zwingender Variablendeklaration (Option Explicit) zu arbeiten, denn dann wirst Du schnell auf unterschiedliche Schreibweisen im Code aufmerksam gemacht. Ich habe im Code den Variablen andere Typen zugewiesen, schau es Dir genauer an.
30.11.2014, 22:57
Hallo Atilla,
hab da gerad so nen Gedanken.
Hier zu Hause benutze ich Excel 2013
Arbeitet der Code vielleicht nicht mit jeder Version zusammen?
In der Kompakten Codeversion von Rabe?
Denn als alleinstehendes Modul mit meinem Aufruf
Call SpeichernAlsPDF
Geht es ja wieder?
Gruß Mike
hab da gerad so nen Gedanken.
Hier zu Hause benutze ich Excel 2013
Arbeitet der Code vielleicht nicht mit jeder Version zusammen?
In der Kompakten Codeversion von Rabe?
Denn als alleinstehendes Modul mit meinem Aufruf
Call SpeichernAlsPDF
Geht es ja wieder?
Gruß Mike
30.11.2014, 23:24
(30.11.2014, 21:35)Mike4711 schrieb: [ -> ]Hallo Kuwer,
ja....in der Zelle K8 steht #NV
aber nur, wenn du in Zelle "K6" eine Artikelnummer angibst, die es nicht gibt.
Wenn du in Zelle "K6" diese Artikelnummer eingibst: 209901
wird in Zelle "K8" der Name des Lieferanten angezeigt und das soll der Erste Teil des Dateinamens sein, der zweite Teil ist die Zelle "J3"
#NV ist eine Meldung, von der Formel, die in der Zelle "K8" wieder gegeben wird, wenn der Wert nicht gefunden wird.
Gruß Mike
Alles klaro, dann noch viel Spaß beim Basteln und Aneinandervorbeireden. :21:
Gruß Uwe
30.11.2014, 23:24
Hallo Mike,
nein, das hat damit nichts zu tun. Lies Dir die Beiträge genauer durch.
Uwe hat es Dir beschrieben, und ich habe Dir dazu eine passende Lösung angeboten.
Schreib nicht immer geht nicht, sondern beschreib genau, was Du gemacht hast, und ob und welche Fehlermeldungen wann auftauchen.
nein, das hat damit nichts zu tun. Lies Dir die Beiträge genauer durch.
Uwe hat es Dir beschrieben, und ich habe Dir dazu eine passende Lösung angeboten.
Schreib nicht immer geht nicht, sondern beschreib genau, was Du gemacht hast, und ob und welche Fehlermeldungen wann auftauchen.
30.11.2014, 23:27
Hallo Uwe,
die Brille muss ich auch unbedingt haben :19:
die Brille muss ich auch unbedingt haben :19:
30.11.2014, 23:52
Hallo Uwe,
Hallo Atilla,
Beitrag 65 sah für mich so aus, das nicht ich damit angesprochen wurde sondern Herbert.
Ich war der Meinung, das Herbert und Atilla sich mit sich mit dem Code beschäftigen, da dieser Code nicht mein Ursprünglicher Code ist und Atilla Herbert anschreibt, fühle ich mich nicht angesprochen.
Mein eigener Code, den ich zu Anfang hatte, funktionierte prima.
Ich wiederhole mich jetzt......nach der kompakten Zusammenstellung von Rabe, geht er nicht mehr.
Ich finde es gut, das sich mehrere Profis hier mit einbinden, doch ich kann euch nicht dabei helfen.
Da verliere ich den Überblick, wer denn jetzt wen meint.
Ich suche einen Code im Netz, der das machen soll, was ich gern hätte und passe höchstens Zellen und Pfade an.
Hat denn noch niemand mit bekommen, das ich nicht VBA programmieren kann? :)
Ich bin VBA Nichtskönner.:27: :19:
Grüße an euch alle, die hier wegen mi, dauernd mit dem Kopf schütteln.
Hallo Atilla,
Beitrag 65 sah für mich so aus, das nicht ich damit angesprochen wurde sondern Herbert.
Ich war der Meinung, das Herbert und Atilla sich mit sich mit dem Code beschäftigen, da dieser Code nicht mein Ursprünglicher Code ist und Atilla Herbert anschreibt, fühle ich mich nicht angesprochen.
Mein eigener Code, den ich zu Anfang hatte, funktionierte prima.
Ich wiederhole mich jetzt......nach der kompakten Zusammenstellung von Rabe, geht er nicht mehr.
Ich finde es gut, das sich mehrere Profis hier mit einbinden, doch ich kann euch nicht dabei helfen.
Da verliere ich den Überblick, wer denn jetzt wen meint.
Ich suche einen Code im Netz, der das machen soll, was ich gern hätte und passe höchstens Zellen und Pfade an.
Hat denn noch niemand mit bekommen, das ich nicht VBA programmieren kann? :)
Ich bin VBA Nichtskönner.:27: :19:
Grüße an euch alle, die hier wegen mi, dauernd mit dem Kopf schütteln.