|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
07.05.2022 16:38:49 |
Mirko |
|
|
|
07.05.2022 20:09:48 |
ralf_b |
|
|
|
07.05.2022 21:11:07 |
mirko |
|
|
 Macro laufen lassen wenn bestimmtes wort über der Tabelle gefunden wird |
08.05.2022 10:31:58 |
ralf_b |
|
|
|
07.05.2022 21:23:11 |
Gast51354 |
|
|
|
07.05.2022 21:30:32 |
Gast51354 |
|
|
|
07.05.2022 22:24:29 |
mirko |
|
|
|
07.05.2022 22:41:03 |
Gast97841 |
|
|
|
08.05.2022 06:53:05 |
Gast25005 |
|
|
Von:
ralf_b |
Datum:
08.05.2022 10:31:58 |
Views:
578 |
Rating:
|
Antwort:
|
Thema:
Macro laufen lassen wenn bestimmtes wort über der Tabelle gefunden wird |
|
bei Listobjects ändert sich fast alles. Da kann mann auf deren Objekte zugreifen und muß eben nicht Anfang und Ende suchen.
Das Ausschalten von Screenupdating und automatische Calculation wäre hier noch erwähnenswert.
dim i as Long
'vorraussetzung die hilfszeile steht allein und ist deckungsgleich der Datentabelle
for each rng in wks.Range("B8").CurrentRegion
i = i+1
Select rng.value
case suchwort1: call funktion1(Listobjects(1).Listcolumns(i).DataBodyRange.SpecialCells(xlCellTypeVisible))
case suchwort2: call funktion2(Listobjects(1).Listcolumns(i).DataBodyRange.SpecialCells(xlCellTypeVisible))
usw. ....
end select
next
|
- 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
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- 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
|
|
07.05.2022 16:38:49 |
Mirko |
|
|
|
07.05.2022 20:09:48 |
ralf_b |
|
|
|
07.05.2022 21:11:07 |
mirko |
|
|
Macro laufen lassen wenn bestimmtes wort über der Tabelle gefunden wird |
08.05.2022 10:31:58 |
ralf_b |
|
|
|
07.05.2022 21:23:11 |
Gast51354 |
|
|
|
07.05.2022 21:30:32 |
Gast51354 |
|
|
|
07.05.2022 22:24:29 |
mirko |
|
|
|
07.05.2022 22:41:03 |
Gast97841 |
|
|
|
08.05.2022 06:53:05 |
Gast25005 |
|
|