WinFuture-Forum.de: Excel 2007 Makro VB - Fehler bei Neues Blatt - WinFuture-Forum.de

Zum Inhalt wechseln

Nachrichten zum Thema: Entwicklung
  • 2 Seiten +
  • 1
  • 2

Excel 2007 Makro VB - Fehler bei Neues Blatt


#1 Mitglied ist offline   jackson2340 

  • Gruppe: aktive Mitglieder
  • Beiträge: 35
  • Beigetreten: 10. November 10
  • Reputation: 0

  geschrieben 12. November 2010 - 13:37

servus!
ich habe ein problem mit einem makro für excel 2007 und zwar, wenn
ich auf neues blatt klicke, dann tritt ein fehler auf von dem ich nicht weiß wie ich das problem löse,
da ich noch recht unerfahren bin auf gebiet, vielleicht weiß hier ja jemand rat.

der fehler tritt bei "Call init_DlgNewPjfSheet" auf.

Dieser Beitrag wurde von jackson2340 bearbeitet: 23. November 2010 - 17:09

0

Anzeige



#2 Mitglied ist offline   tobias86 

  • Gruppe: aktive Mitglieder
  • Beiträge: 1.690
  • Beigetreten: 14. August 06
  • Reputation: 6
  • Geschlecht:Männlich
  • Wohnort:localhost

geschrieben 15. November 2010 - 08:28

Was hast du eigentlich mit deinem Makro vor? Welche Sub ist die Start-Sub von der alles aus geht? Mehr Informationen wären hilfreich :)
0

#3 Mitglied ist offline   egal8888 

  • Gruppe: aktive Mitglieder
  • Beiträge: 1.019
  • Beigetreten: 23. September 10
  • Reputation: 25
  • Geschlecht:Männlich

geschrieben 15. November 2010 - 08:45

Eine leere Excel Tabelle wäre als Upload auch mal sehr hilfreich.
0

#4 Mitglied ist offline   tobias86 

  • Gruppe: aktive Mitglieder
  • Beiträge: 1.690
  • Beigetreten: 14. August 06
  • Reputation: 6
  • Geschlecht:Männlich
  • Wohnort:localhost

geschrieben 15. November 2010 - 09:14

Zur Information: Crossposting ist nicht gerne gesehen

http://www.computerb...ad.php?t=813756
0

#5 Mitglied ist offline   jackson2340 

  • Gruppe: aktive Mitglieder
  • Beiträge: 35
  • Beigetreten: 10. November 10
  • Reputation: 0

geschrieben 15. November 2010 - 21:40

die fehlermeldung lautet "Projekt oder Bibliothek nicht gefunden".
habe da schon nach gegoogelt und dort wurde gesagt, dass ich unter extras/verweise nachschauen soll, aber bei mir ist das grau hinterlegt, da kann ich nichts anklicken oder ändern.

der button soll einfach ein neues blatt/tabelle öffnen.
0

#6 Mitglied ist offline   egal8888 

  • Gruppe: aktive Mitglieder
  • Beiträge: 1.019
  • Beigetreten: 23. September 10
  • Reputation: 25
  • Geschlecht:Männlich

geschrieben 16. November 2010 - 07:04

@jackson:

Nu komm schon, jetzt lad doch mal die leere Excel-Datei hoch.
Ohne die kann ich mir das leider nicht alles zusammenreimen.
0

#7 Mitglied ist offline   jackson2340 

  • Gruppe: aktive Mitglieder
  • Beiträge: 35
  • Beigetreten: 10. November 10
  • Reputation: 0

geschrieben 16. November 2010 - 18:25

Beitrag anzeigenZitat (egal8888: 16.11.2010, 07:04)

@jackson:

Nu komm schon, jetzt lad doch mal die leere Excel-Datei hoch.
Ohne die kann ich mir das leider nicht alles zusammenreimen.

ok, hier sie, musste sie packen, weil zu groß. ^_^
wie gesagt, funktioniert alles soweit, nur wenn ich auf neues blatt klicke kommt die fehlermeldung.
schon mal danke für deine mühe!

Dieser Beitrag wurde von jackson2340 bearbeitet: 23. November 2010 - 17:10

0

#8 Mitglied ist offline   egal8888 

  • Gruppe: aktive Mitglieder
  • Beiträge: 1.019
  • Beigetreten: 23. September 10
  • Reputation: 25
  • Geschlecht:Männlich

geschrieben 17. November 2010 - 08:40

Angehängte Datei  Vorlage.zip (63,72K)
Anzahl der Downloads: 136

So, jetzt funktioniert es erstmal.
Da sind aber bestimmt noch zig andere Fehler drin.
Ich erzähl Dir gleich noch was dazu.

Muß jetzt erstmal weg.
0

#9 Mitglied ist offline   egal8888 

  • Gruppe: aktive Mitglieder
  • Beiträge: 1.019
  • Beigetreten: 23. September 10
  • Reputation: 25
  • Geschlecht:Männlich

geschrieben 17. November 2010 - 10:53

Also...

der erste Fehler war, daß Du im Formular "DlgNewPjfSheet" kein Textfeld mit dem Namen "fd_SheetName" angelegt hattest. Das war auch der Fehler, den Du oben beschrieben hast.

Dann hast Du aber noch mehrmals die Variable "fd_PlanStart" mit der nicht vorhandenen Variablen "fd_PlanStartDate" durcheinander gewürfelt.

Dann habe ich jetzt - damit es erstmal funktioniert - die folgenden Zeilen auskommentiert:

'int_WeekStart = CInt(VBA.Format(DlgNewPjfSheet.fd_PlanStart.Value, "ww"))
'int_WeekEnd = int_WeekStart + DlgNewPjfSheet.fd_i_PlanWeeks.Value - 1


Da mußt Du Dich dann nochmal selber drum kümmern.

Und dann mußte ich noch diese Zeilen
int_DateDiff = DateDiff("d", DlgNewPjfSheet.fd_SheetName.Value, int_StartOfWeek, int_StartOfWeek)

durch die nachfolgenden ersetzen.
int_DateDiff = DateDiff("d", DlgNewPjfSheet.fd_SheetName.Value, DlgNewPjfSheet.fd_SheetName.Value, int_StartOfWeek, int_StartOfWeek)

Sonst kommt es zu einem Pufferüberlauf.

Dazu solltest Du Dir wegen dem WARUM nochmal in der VBA-Hilfe die Funktion DatDiff() anschauen.

Dieser Beitrag wurde von egal8888 bearbeitet: 17. November 2010 - 10:54

0

#10 Mitglied ist offline   jackson2340 

  • Gruppe: aktive Mitglieder
  • Beiträge: 35
  • Beigetreten: 10. November 10
  • Reputation: 0

geschrieben 17. November 2010 - 12:33

vielen dank für deine hilfe, allerdings funktioniert es bei mir immer noch nicht.
haben deine datei runtergeladen und den code ersetzt, trotzdem kommt wieder die fehlermeldung
"Projekt oder Bibliothek nicht gefunden"
0

#11 Mitglied ist offline   egal8888 

  • Gruppe: aktive Mitglieder
  • Beiträge: 1.019
  • Beigetreten: 23. September 10
  • Reputation: 25
  • Geschlecht:Männlich

geschrieben 17. November 2010 - 14:46

Also bei mir funktioniert es 100%ig.

Wenn Du meine Datei unverändert startest, kommt dann beim Drücken auf den Button für das neue Blatt die Fehlermeldung "Projekt oder Bibliothek nicht gefunden"?

Du kannst sonst noch unter "Verweisen" gucken. Bei mir sind die folgenden Verweise eingebunden:

Angehängtes Bild: VBAVerweise.png
0

#12 Mitglied ist offline   jackson2340 

  • Gruppe: aktive Mitglieder
  • Beiträge: 35
  • Beigetreten: 10. November 10
  • Reputation: 0

geschrieben 17. November 2010 - 14:57

ja genau, deine datei runtergeladen und excel gestartet, dann auf "Neues Blatt" geklickt und dann kommt folgendes bild:

http://www.abload.de...g=makrolbfo.jpg
0

#13 Mitglied ist offline   egal8888 

  • Gruppe: aktive Mitglieder
  • Beiträge: 1.019
  • Beigetreten: 23. September 10
  • Reputation: 25
  • Geschlecht:Männlich

geschrieben 17. November 2010 - 15:14

Die Funktion Date() gehört aber zum Standard-Inventar von VBA.
Und wenn bei Dir der Verweis "Visual Basic for Applications" angehakt ist, muß das gehen.

Du kannst ja mal alternativ aus dem "Date" ein "Now" machen.
Geht es dann?

Oder guck mal auf den Pfad, auf den der Verweis "Visual Basic for Applications" zeigt.
Der muß auf "%CommonProgramFiles%\Microsoft Shared\VBA\VBA6\VBE6.DLL" zeigen.
0

#14 Mitglied ist offline   jackson2340 

  • Gruppe: aktive Mitglieder
  • Beiträge: 35
  • Beigetreten: 10. November 10
  • Reputation: 0

geschrieben 17. November 2010 - 15:17

ich komme nicht in das fenster bei extras\verweise, das ist bei mir grau hinterlegt - kann ich nicht auswählen.

aaaah, schon gut, ich depp! :ph34r:

Dieser Beitrag wurde von jackson2340 bearbeitet: 17. November 2010 - 15:28

0

#15 Mitglied ist offline   egal8888 

  • Gruppe: aktive Mitglieder
  • Beiträge: 1.019
  • Beigetreten: 23. September 10
  • Reputation: 25
  • Geschlecht:Männlich

geschrieben 17. November 2010 - 15:38

Beitrag anzeigenZitat (jackson2340: 17.11.2010, 15:17)

aaaah, schon gut, ich depp! :ph34r:


Ja wie nu, geht jetzt, oder wie soll ich das jetzt verstehen?
0

Thema verteilen:


  • 2 Seiten +
  • 1
  • 2

1 Besucher lesen dieses Thema
Mitglieder: 0, Gäste: 1, unsichtbare Mitglieder: 0