vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
NEU! sevCoolbar 3.0 - Professionelle Toolbars im modernen Design!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Re: Laufzeitfehler 13 Typen unverträglich 
Autor: PM-ORD
Datum: 05.11.15 13:54

Nachtrag:

'MsgBox "letzte, befüllte Zeille = " & wletztegefZeile

For c = 4 To wletztegefZeile

With Workbooks("REKLA 2015.xls").Worksheets(wTBName)

If Trim(.Cells(c, 1)) <> "" Then

If (Trim(.Cells(c, 4)) <> "x" And Trim(.Cells(c, 4)) <> "X") Then

'MsgBox "noch nicht gedruckt!! Tabellenblatt = " & wTBName & " Zeile = " & c

Const MissingValue As Long = -10000000

If IsNumeric(.Cells(c, 3).Value) Then woVorgangsNr = CLng(.Cells(c, 3).Value)

Else

woVorgangsNr = MissingValue

End If


woReklaNr = .Cells(3, 1).Value & .Cells(c, 1).Value
woReklaBetrag = Format(.Cells(c, 2).Value, "0.00")

woVorgangsNr = .Cells(c, 3).Value

woKostentraeger = .Cells(c, 8).Value
woKunde = .Cells(c, 9).Value
woRechnungsNr = .Cells(c, 10).Value
woErstelltDatum = .Cells(c, 11).Value
woRueckgabeDatum = .Cells(c, 12).Value

woFilialeKurz = Filialbezeichnung_ermitteln(wTBName)

Call Word_Dokument_von_Excel_aus_steuern(woFilialeKurz, woReklaNr, woReklaBetrag, woVorgangsNr, woKostentraeger, woKunde, woRechnungsNr, woErstelltDatum, woRueckgabeDatum)

.Cells(c, 4).Value = "X"

ActiveWorkbook.Save

Else
'MsgBox "bereits gedruckt" & .Cells(c, 4) & " Zeile = " & c

End If

'Else

'End If

End With

So schaut es aktuell aus:

Allerdings wenn ich die offenen Reklas drucken will kommt nach gefühlten 5min folgende Meldung:
Das Objekt meldet aich nicht. Möglicherweise ist die Quellanwendung ausgelastet
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Laufzeitfehler 13 Typen unverträglich2.404PM-ORD03.11.15 15:40
Re: Laufzeitfehler 13 Typen unverträglich1.953Blackbox03.11.15 17:48
Re: Laufzeitfehler 13 Typen unverträglich2.005PM-ORD04.11.15 08:39
Re: Laufzeitfehler 13 Typen unverträglich1.732Blackbox04.11.15 17:37
Re: Laufzeitfehler 13 Typen unverträglich1.781PM-ORD05.11.15 08:02
Re: Laufzeitfehler 13 Typen unverträglich1.688Manfred X05.11.15 10:10
Re: Laufzeitfehler 13 Typen unverträglich1.651PM-ORD05.11.15 10:13
Re: Laufzeitfehler 13 Typen unverträglich1.625Manfred X05.11.15 10:18
Re: Laufzeitfehler 13 Typen unverträglich1.690PM-ORD05.11.15 10:38
Re: Laufzeitfehler 13 Typen unverträglich1.892Manfred X05.11.15 11:55
Re: Laufzeitfehler 13 Typen unverträglich1.813PM-ORD05.11.15 13:34
Re: Laufzeitfehler 13 Typen unverträglich1.976PM-ORD05.11.15 13:54
Re: Laufzeitfehler 13 Typen unverträglich1.847Blackbox05.11.15 16:59

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel