Die Suche ergab 12 Treffer

von Paul1206
28. Okt 2024, 10:22
Forum: Microsoft Excel
Thema: Ein Userform zur Erfassung und Verwaltung von Datensätzen.
Antworten: 0
Zugriffe: 1632

Ein Userform zur Erfassung und Verwaltung von Datensätzen.

Hallo Miteinander, nach etwas Abstinenz lade ich hier mal wieder für die allgemeine Nutzung (Nutzung des Quelltextes auf eigene Gefahr) etwas hoch. Es tauchen in der letzten Zeit immer mal wieder Fragen in Foren auf, wo versucht wird den Code aus Lernbeispieldateien seinen eigenen Projekten anzupass...
von Paul1206
17. Aug 2024, 11:46
Forum: Microsoft Excel
Thema: Seriendruck Pläne per Mail verschicken
Antworten: 112
Zugriffe: 26792

Re: Seriendruck Pläne per Mail verschicken

Hallo Jens, teste mal ob das so klappt: Sub EinstzplanPerMailEinzeln() Dim mailBetreff$, mailBody$, mailAdresse$, mailCC$, mailBCC$, mailAnhang$ mailAdresse = "hugo.frantz@test.de" mailBetreff = "Nur ein Hallo" mailBody = "Hallo Hugo..." mailAnhang = ThisWorkbook.Path &...
von Paul1206
19. Jul 2024, 14:37
Forum: Microsoft Excel
Thema: Schaltfläche sichtbar wenn Wert in Zelle erreicht
Antworten: 13
Zugriffe: 12192

Re: Schaltfläche sichtbar wenn Wert in Zelle erreicht

Hallo thowe,

Asche auf mein Haupt. Klar geht es auch objBtn As Button und nicht nur übers Shape.
War wohl heut Vormittag beim Zaunstreichen zu lang in der Sonne.

Gruß Uwe
von Paul1206
19. Jul 2024, 12:53
Forum: Microsoft Excel
Thema: Schaltfläche sichtbar wenn Wert in Zelle erreicht
Antworten: 13
Zugriffe: 12192

Re: Schaltfläche sichtbar wenn Wert in Zelle erreicht

noch was vergessen. Falls der Button wieder verschwinden soll, weil Wert nicht mehr vorhanden ist hilft dies: Sub deleteCmdFstE() Dim objBtn As Button For Each objBtn In Tabelle1.Buttons If InStr(1, objBtn.Name, "Ziel", vbTextCompare) > 0 Then objBtn.Delete End If Next End Sub Gruß Uwe
von Paul1206
19. Jul 2024, 12:11
Forum: Microsoft Excel
Thema: Schaltfläche sichtbar wenn Wert in Zelle erreicht
Antworten: 13
Zugriffe: 12192

Re: Schaltfläche sichtbar wenn Wert in Zelle erreicht

Hallo Nanu, eine Schaltfläche (Formularsteuerelment CommandButton). kann man nicht .Visible = True/False stellen. Aber man kann, wenn der Zielwert erreicht ist, einen Button mit der Methode .Add erzeugen und den Namen bzw. aussehen, Buttontext sowie Makroverknüpfung mitgeben. Ein Beispiel für neuen ...
von Paul1206
17. Jul 2024, 18:34
Forum: Microsoft Excel
Thema: Countdown zum Renteneintritt
Antworten: 4
Zugriffe: 3814

Re: Countdown zum Renteneintritt

Hallo thowe,

naja ist eigentlich Allerweltscode verbunden mit ein bisschen Datums- und Zeitrechnerei.

Gruß Uwe
von Paul1206
16. Jul 2024, 12:41
Forum: Microsoft Excel
Thema: Countdown zum Renteneintritt
Antworten: 4
Zugriffe: 3814

Countdown zum Renteneintritt

Hallo Miteinander, gestern beim Grillen kam die Idee für meinem Nachbar etwas zusammenzustellen, um die noch verbleibenden Tage, Stunden etc. anzeigen zu lassen. Das ist nun das Ergebnis zu diesem Problem. Es ist eher als lustige Möglichkeit zu betrachten, was sich so alles mit VBA in Excel anstelle...
von Paul1206
3. Jul 2024, 21:57
Forum: Microsoft Excel
Thema: In der Größe veränderbares Userform
Antworten: 2
Zugriffe: 4863

Re: In der Größe veränderbares Userform

Hallo xlKing, das ist mal eine wirklich brauchbare Sache. Ich selber neige allerdings eher dazu die Formularleiste auszublenden und dafür meinen eigenen Kram einzubauen. Das wäre dann so: 1. Codeteil in ein allgemeines Modul #If VBA7 Then Declare PtrSafe Function FindWindow Lib "user32.dll"...
von Paul1206
18. Jun 2024, 18:32
Forum: Microsoft Excel
Thema: Drucker (Spielereien)
Antworten: 22
Zugriffe: 16498

Re: Drucker (Spielereien)

Hallo, das was ich da ausgeblendet hatte, diente der Übersichtlichkeit (wechselnde Besetzung im Sekretariat) zum Ausdruck in der korrekten Abteilung in einem Krankenhaus. Das hatte ich mal für einem Schüler zusammengestellt, der da Chefarzt ist. Da gab es noch eine 2. Funktion, wo die auszusperrende...
von Paul1206
18. Jun 2024, 14:03
Forum: Microsoft Excel
Thema: Drucker (Spielereien)
Antworten: 22
Zugriffe: 16498

Re: Drucker (Spielereien)

Hallo Miteinander, Danke für die Info, dass es mit O365 brauchbar bleibt. Muss ich mir also nichts neues Zusammenstellen. Die Verrenkungen sind nicht böse oder wie auch immer gemeint. Es ist eigentlich der kurze und schnellste Weg zum Ziel dies schlicht in einer And Abfrage zu machen. Wenn es um Les...