Thema Datum  Von Nutzer Rating
Antwort
01.07.2009 10:19:53 Célline
NotSolved
01.07.2009 13:03:22 Holger
NotSolved
02.07.2009 10:38:30 Holger
NotSolved
Blau Aw:Virtuelle tabellen automatisch gelöscht -.-'
02.07.2009 07:58:20 Céline
NotSolved
02.07.2009 11:11:03 Céline
NotSolved
04.07.2009 11:28:46 Holger
NotSolved

Ansicht des Beitrags:
Von:
Céline
Datum:
02.07.2009 07:58:20
Views:
1296
Rating: Antwort:
  Ja
Thema:
Aw:Virtuelle tabellen automatisch gelöscht -.-'
Guten morgen Holger,

Erstmal vielen dank für deine Antwort,

Das Problem ist dass ich momentan die Daten die in den 6 Tabellenblätter abgespeichert sind anfangs erst in die 6 arrays ziehe, da die anfangs immer geleert werden wie schon beschrieben. Zum Schluss muss ich die alten + neue Daten die im Programm in den arrays hinzugefügt oder geändert wurden, zurück in die Tabellenblätter 1-6 abspeichern, damit ich diese daten wieder benutzen kann(also die Daten die geänder und hinzugefügt wurden).
Wenn ich mein Programm im einzelschritt durchlaufenlasse, funktioniert alles, bzw., es trägt die Namen in die richtige Spalte des Kalenders ein, eine msgbox kommt wenn sich schon genügend Mitarbeiter um eine bestimmte Uhrzeit eingetragen haben. Aber wenn ich dann an die Stelle komme wo ich die neue Daten der arrays neu in die 6 Tabellenblätter speichert möchte.
Löscht es mir im Kalender wieder alle Namen die zuvor eingetragen wurden..

Ich muss nicht unbedingt die Tabellenblätter benutzen, da ich da nicht direkt zugreife aber die Daten bleiben leider nicht in den arrays, bleiben sie wenn ich mit Static deklariere? In meinem Programm brauche ich immer wieder diese daten, da ich hier sehen kann ob sich die Mitarbeiter schon eingetragen haben, und wenn noch platzt ist, den neuen Mitarbeiter eintragen. Ich teste die arrays mit :

If nom6(Zeile - 8, Tag - 2) = "" Then
nom6(Zeile - 8, Tag - 2) = TextBox4.Value ' hier füllt es die arrays
Cells(Zeile, Tag) = Cells(Zeile, Tag).Value & "/" & TextBox4.Value 'hier den Kalender
Else
If nom5(Zeile - 8, Tag - 2) = "" Then
Cells(Zeile, Tag) = Cells(Zeile, Tag).Value & "/" & TextBox4.Value
nom5(Zeile - 8, Tag - 2) = TextBox4.Value
Else
… usw. und am schluss
else
msgbox..“es sind schon zu viele angemeldet „ ' also wenn alle 6 arrays um diese Zeit schon gefüllt sind.


Hoffe es ist gut erklärt..

Grüße

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
01.07.2009 10:19:53 Célline
NotSolved
01.07.2009 13:03:22 Holger
NotSolved
02.07.2009 10:38:30 Holger
NotSolved
Blau Aw:Virtuelle tabellen automatisch gelöscht -.-'
02.07.2009 07:58:20 Céline
NotSolved
02.07.2009 11:11:03 Céline
NotSolved
04.07.2009 11:28:46 Holger
NotSolved