Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon Rickie vom 09.03.2019, 20:33 Options
Zwei Makro-Problemchen
Ich möchte in einer Tabelle zwei Makro integrieren;
1. Mit Workbook open möchte in einer Spalte, in welcher die Kalenderwoche als Zahl eingefügt ist auf die aktuelle Woche gelangen.
2. Weiter möchte ich in einer anderen Spalte erreichen, dass wenn in einer Zelle ein bestimmtes Zeichen steht (z.B. ein 'X') die betreffende Zeile automatisch ausgeblendet wird.
Besten Dank im Voraus für Eure Hilfe
1. Mit Workbook open möchte in einer Spalte, in welcher die Kalenderwoche als Zahl eingefügt ist auf die aktuelle Woche gelangen.
2. Weiter möchte ich in einer anderen Spalte erreichen, dass wenn in einer Zelle ein bestimmtes Zeichen steht (z.B. ein 'X') die betreffende Zeile automatisch ausgeblendet wird.
Besten Dank im Voraus für Eure Hilfe
Antwort 1 von Beverly vom 09.03.2019, 20:55 Options
Hi,
zu 1. Löse das Problem mit der Funktion Find
zu 2. integriere den entsprechenden Code in das Worksheets_Change Ereignis z.B. in dieser Form
Bis später,
Karin
zu 1. Löse das Problem mit der Funktion Find
zu 2. integriere den entsprechenden Code in das Worksheets_Change Ereignis z.B. in dieser Form
If Target = "X" Then Target.EntireRow.Hidden = True
Bis später,
Karin
Antwort 2 von Rickie vom 09.03.2019, 21:43 Options
Hallo Karin
Besten Dank für die schnelle Hilfe;
50% hat geklappt, d.h. das Zeilen ausblenden.
Das mit der Funktion Find war mir schon klar - auch könnte ich so z.B. ein Datum finden - aber 'what' suche ich, wenn ich die aktuelle Kalenderwoche finden will???
Besten Dank für die schnelle Hilfe;
50% hat geklappt, d.h. das Zeilen ausblenden.
Das mit der Funktion Find war mir schon klar - auch könnte ich so z.B. ein Datum finden - aber 'what' suche ich, wenn ich die aktuelle Kalenderwoche finden will???
Antwort 3 von nighty vom 10.03.2019, 15:29 Options
hi all :-)
ein beispiel
gruss nighty
zelle a1 bzw Sheets(1).Cells(1, 1) wäre der eintrag der kalenderwoche
If Format(CDate(Sheets(1).Cells(1, 1)), "ww", vbMonday, vbFirstFourDays) = DeineKalenderwoche Then
rem DeinCode
End If
ein beispiel
gruss nighty
zelle a1 bzw Sheets(1).Cells(1, 1) wäre der eintrag der kalenderwoche
If Format(CDate(Sheets(1).Cells(1, 1)), "ww", vbMonday, vbFirstFourDays) = DeineKalenderwoche Then
rem DeinCode
End If
Antwort 4 von nighty vom 10.03.2019, 15:34 Options
hi all :-)
ups was durcheinandergeraten
gruss nighty
eingabe der kalenderwoche
a1 wird geprueft auf die angegebene kalenderwoche
Kalenderwoche = InputBox(Prompt:="Kalenderwoche")
If Format(CDate(Sheets(1).Cells(1,1)), "ww", vbMonday, vbFirstFourDays) = Kalenderwoche Then
End If
ups was durcheinandergeraten
gruss nighty
eingabe der kalenderwoche
a1 wird geprueft auf die angegebene kalenderwoche
Kalenderwoche = InputBox(Prompt:="Kalenderwoche")
If Format(CDate(Sheets(1).Cells(1,1)), "ww", vbMonday, vbFirstFourDays) = Kalenderwoche Then
End If
Ähnliche Themen
Makros - zweiten Drucker als Symbol in die Symbolleiste einfügen
Mikoop 24.11.2006 - 4092 Hits - 1 Antwort
kann wegen makro nicht drucken - was machen?
srepsac 26.06.2007 - 118 Hits - 1 Antwort
Zeilen- und Spaltenüberschriften
Peter3011 27.06.2007 - 127 Hits - 3 Antworten
Möchte zwei Wenn Prüfungen verschachteln und in ein Makro einbetten- kennt jemand den Befehl
servus 30.10.2007 - 76 Hits - 2 Antworten
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
