Freigeben über

Error in VBA code in Excel

Anonym
2023-06-22T08:39:35+00:00

Good morning,

I have a VBA code that was working fine and now it keeps bringing up an error message. Can someone help me here please? Thank you!

Microsoft 365 und Office | Excel | Geschäftlich | Windows

Gesperrte Frage. Diese Frage wurde aus der Microsoft-Support-Community migriert. Sie können darüber abstimmen, ob sie hilfreich ist, aber Sie können keine Kommentare oder Antworten hinzufügen oder der Frage folgen.

0 Kommentare

Antwort, die vom Frageautor angenommen wurde

Andreas Killer 144.1K Zuverlässigkeitspunkte Freiwilliger Moderator
2023-07-29T17:08:57+00:00

Dein Code hat super funktioniert, aber jetzt bringt er mir ständig diese beiden Fehler und ich weiß nicht, warum!

Naja, die Fehlermeldung sagt es doch, der Dateipfad ist zu lang.

Wenn ich mal davon ausgehe das die Datei immer noch an der gleichen Stelle liegt, dann muss in Range("rng_nameofevent") irgendwas sehr langes drin sein.

Andreas.

War diese Antwort hilfreich?

Eine Person fand diese Antwort hilfreich.
0 Kommentare

12 zusätzliche Antworten

Sortieren nach: Am hilfreichsten
Am hilfreichsten Neueste Älteste
  1. Anonym
    2023-06-23T06:10:47+00:00

    Guten Morgen Andreas,

    vielen lieben Dank für deine Hilfe.

    Zum Code für das Datumsfeld - leider bin ich mit VBA nicht so vertraut, deshalb auch die "komischen" Fragen.

    Kannst du mir vielleicht einen Tipp geben, wie ich das in den Code einpflegen muss?

    If IsEmpty(range("rng_date")) then

    oder

    If range("rng_date") <>"" then

    Danke Dir!

    War diese Antwort hilfreich?

    0 Kommentare
  2. Andreas Killer 144.1K Zuverlässigkeitspunkte Freiwilliger Moderator
    2023-06-22T14:35:45+00:00

    Einfach für mich zu beantworten, aber ob Du es umsetzen kannst...

    a) Wenn PP die Datei nicht speichern kann liegt es am Pfad / Dateinamen. Vermutlich gibt es den Pfad in strPfad nicht und/oder in den Zellen range("nameofevent") bzw. range("rng_date") steht Unsinn oder es gibt diese Zellen nicht...

    Ohne die Dateien zu sehen kann ich dazu nicht mehr sagen.

    b) Naja, musst Du halt einfach prüfen via

    If IsEmpty(range("rng_date")) then

    oder

    If range("rng_date") <>"" then

    und in dem Fall schreibst Du halt nix in das Shape.

    Andreas.

    War diese Antwort hilfreich?

    0 Kommentare
  3. Anonym
    2023-06-22T12:07:56+00:00

    Hallo Andreas,

    vielen lieben Dank, es hat funktioniert. Es lag genau daran. Aber jetzt habe ich ein anderes Problem - er macht alles, aber er speichert die Präsentation leider nicht ab. Was kann ich jetzt tun?

    Eine Frage habe ich noch, vielleicht kannst du hier auch helfen? Wenn dann in der Date-Zelle kein Datum steht, dann überträgt er die Daten so:
    Samstag, 0. Januar 1900 ...

    Wie kann ich das umgehen? Dann soll einfach nix in der Zelle stehen.

    Dankeschön!

    War diese Antwort hilfreich?

    0 Kommentare
  4. Andreas Killer 144.1K Zuverlässigkeitspunkte Freiwilliger Moderator
    2023-06-22T10:32:11+00:00

    Hier ist das Deutsche Forum, bitte auf Deutsch fragen. ;-)

    Entweder ist der Verweis in VBA zu PowerPoint nicht gesetzt oder defekt. Extras \ Verweise und es sollte so aussehen

    Andreas.

    War diese Antwort hilfreich?

    0 Kommentare