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 |
|
|
|
08.05.2022 10:31:58 |
ralf_b |
|
|
Macro laufen lassen wenn bestimmtes wort über der Tabelle gefunden wird |
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:
Gast51354 |
Datum:
07.05.2022 21:23:11 |
Views:
647 |
Rating:
|
Antwort:
|
Thema:
Macro laufen lassen wenn bestimmtes wort über der Tabelle gefunden wird |
Da gibt es unterschiedliche Möglichkeiten anzusetzen; alle funktionieren jedoch per Schleife (wie auch sonst...?).
' Bestimme Bereich: B1:%1
' - % ist dabei die Unbekannte, welche per Range.End(xlToLeft) bestimmt wird
Set rngHeaderHelpers = wks.Range("B1", wks.Cells(1, wks.Columns.Count).End(xlToLeft))
' falls wir links von Spalte B landen, gibt es keinen Inhalt in der Zeile1
If rngHeaderHelpers.Column < 2 _
Then Exit Sub
For Each rngCell in rngHeaderHelpers.Cells
'Sonderzeichen1?
If InStr(rngCell.value, "+") > 0 Then
Call Funktion1(rngCell)
End If
'Sonderzeichen2?
If InStr(rngCell.value, "*") > 0 Then
Call Funktion2(rngCell)
End If
'Sonderzeichen3?
If InStr(rngCell.value, "~") > 0 Then
Call Funktion3(rngCell)
End If
Next
Code ungetestet! (Freihand getippt)
|
- 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 |
|
|
|
08.05.2022 10:31:58 |
ralf_b |
|
|
Macro laufen lassen wenn bestimmtes wort über der Tabelle gefunden wird |
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 |
|
|