VB-Paradise 2. 0 – Die große Visual-Basic- und » Forum » Programmieren » Visual Basic for Applications (VBA) » Excel Hallo Zusammen, ich erkläre erstmal die Rahmenbedingungen... Wir nutzen eine Software die eine Excelvorlage öffnet, in das erste Tabellenblatt Daten schreibt und dann ein Macro ausführt. Das hat mit Excel 2003 funktioniert. Nun bekomme ich folgenden Fehler: Laufzeitfehler '13': Typen unverträglich Beim Debuggen zeigt er mir folgende Zeile als Falsch: Delta = DateDiff("d", (0, -4), (1, -4)) Ich habe nicht soviel Ahnung von der Materie und hangel mich dadurch. Also habe ich im Internet rumgesucht und habe alle möglichen ursachen für diesen LAufzeit fehler gefunden aber nichts hat mich so richtig weiter gebracht. Laufzeitfehler 13 Typen Unverträglich VBA Archives - RiesterRente. Kann es mit der Deklaration zu tun haben und damit das ich den code damals für Excel 2003 gemacht habe (Bibliotheken änderungen etc. )? Gruß, LvM Die Selection (Das was ausgewählt ist) ist dein Ausgangspunkt. Wert1 ist 4 spalten weiter links Wert2 ist 4 spalten weiter links und eine nach unten einer dieser Werte ist kein Datum.
Bei ganzen Zahlen hat er einfach nur die Nullen drangehängt: aus 0. 253 wurde 0. 253000 aus -25. 52 wurde -25. 5200 aber aus 10 wurde 10000000 aus 123 wurde 12300000 Für dieses Problem wurde mir nun folgende Syntax vorgeschlagen: Sub n() Dim i As Long, j As Long reenUpdating = False Columns("A:F"). Laufzeitfehler '13': Typen unverträglich. NumberFormat = "@" For i = 1 To 43825 For j = 1 To 6 If Cells(i, j) <> "" Then If Int(Cells(i, j) * 1) = Cells(i, j) * 1 Then Cells(i, j) = Left(Cells(i, j) & ". 00000000)", 8) Else Cells(i, j) = Left(CStr(Cells(i, 1)) & "00000000", 8) End If End If Next j Next i reenUpdating = True End Sub er gibt mir aber für die Zeile If Int(Cells(i, j) * 1) = Cells(i, j) * 1 Then einen "Laufzeitfehler '13': Typen unverträglich" an. Könnte mir jemand sagen, was der Fehler ist? Wie schon erwähnt, habe ich null Ahnung von VBA, deshalb ist mir eine Erklärung in Baby-blabla lieber, als wenn ihr mir Fachbegiffe um die Ohren haut. Vielen Dank im Voraus und schönen Tag noch. Gruß, Michi
Lösung: Nehmen Sie Zuordnungen nur zwischen kompatiblen Datentypen vor. Ein Integer -Wert kann beispielsweise immer einem Long -Wert zugeordnet werden, während ein Single -Wert immer einem Double -Wert und ein beliebiger Typ (außer ein benutzerdefinierter Typ) einer Variante zugeordnet werden kann. Ursache: Es wurde ein Objekt an eine Prozedur übergeben, die eine einzelne Eigenschaft oder einen einzelnen Wert erwartet. Lösung: Übergeben Sie die entsprechende einzelne Eigenschaft, oder rufen Sie eine für das Objekt geeignete Methode auf. Ursache: Es wurde ein Modul - oder Projekt -Name verwendet, obwohl ein Ausdruck erwartet wurde. Beispiel: MyModule Lösung: Geben Sie einen Ausdruck an, der angezeigt werden kann. Laufzeitfehler 13 typen unverträglich vba 10. Ursache: Sie haben versucht, die herkömmliche Basic-Fehlerbehandlung mit Varianten -Werten zu mischen, die dem Fehler -Untertyp (10, vbError) entsprechen. Beispiel: Error CVErr(n) Lösung: Wenn Sie einen Fehler erneut generieren möchten, müssen Sie ihn einem systeminternen Visual Basic-Fehler oder einem benutzerdefinierten Fehler zuordnen und den Fehler anschließend generieren.
DANKE!
Farbe wählen: 2. Zusatzfarbe wählen: Hier wählen 3. Größe wählen: Klein Mittel Groß 4. 3D Sonnenaufgang am Strand Wandtattoo kaufen. Ausrichtung i wie abgebildet gespiegelt In dieser Ausführung: Preis/Artikel Portofrei innerhalb Deutschland Anbringhilfe kostenlos dazu Probe-Wandtattoo inklusive Bestellung auf Rechnung (D + AT) Profi-Qualität aus Deutschland Frisch hergestellt - keine Lagerware Service Hotline Schnelle Lieferung Direkt vom Hersteller Übersicht | Artikel 37 von 45 in dieser Kategorie | |
Das sagen Kunden von A. aus Augsburg Versand war unglaublich schnell, im Paket waren alle Bestellungen enthalten, keine Beschdigungen oder hnliches. Ware sehr zufriedenstellend, immer wieder gerne! E. aus Saarwellingen Die Bestellung war einfach und unkompliziert und der Versand war schnell und zuverlssig. Die Tattoos sehen einfach super aus. Ich kann nur wrmstens weiterempfehlen. P. aus Linkenheim Die Abwicklung lief bestens. Die Ware wurde zgig zugestellt. Die beiligende Erluterung war hilfreich und bestens verstndlich. Ich bin mit dem Ergebnis sehr zufrieden und wsste jetzt nichts was man noch verbessern knnte. 3d wandtattoo sonnenuntergang. D. aus Saal Wir haben am Sonntag Mittag die beiden Wandtattoos angebracht. Ist wunderbar gegangen und wir wrden jederzeit wieder eines bestllen. Zwar wars etwas kniffelig am Anfang, doch dann hatten wir den Dreh und den Kniff heraus. Sieht gut aus, echt super. A. aus Chemnitz Sehr einfache zu steuernde Internetseite und sehr schnelle Lieferung. Super Motive, jeder Zeit wieder.