Tabellenkalkulation

Makro If ActiveCell.Value = "?" Then

Diskussionsgruppen
Betriebsysteme: Windows 7; WindowsVista; WindowsXP; Linux; BS-Sonstige
Software: Textverarbeitung; Tabellenkalkulation; Datenbanken; Bildbearbeitung; Audio/mp3/Video; Security/Viren; E-Mail/Outlook; Internet Browser; SW-Sonstige
Hardware: Mainboard/CPU/RAM; Grafikkarten; Peripherie; HW Sonstiges
Netzwerk: DSL; W-Lan; Telekommunikation; NW-Sonstiges
Programmierung: Skripte(PHP,ASP,Perl...); Webseiten/HTML
Sonstiges: PC-Sonstiges; Plauderecke

Frage

Hallo, ich brauch mal wieder eure Hilfe zu einem Makro. Wie kann ich in einer aktiven Zelle nach dem "Fragezeichen" und einem variablen Text suchen? ActiveCell.Value = "?" Then Gruß Karin

Antwort 1 von Event

Hallo

Vielleicht funktioniert folgendes:

if instr("?",activeCell.value)>0 then beep

Gruß

Antwort 2 von fekarin

Hallo,
ich habe die Anweisung getestet funktioniert leider nicht.

Gruß
Karin

Antwort 3 von ypsilon

hallo Karin,
haben sie dir F1 ausgebaut ?
nach dem hinweis hättest du durchaus alleine drauf kommen können ;-)

Sub test()
If InStr(ActiveCell.Value, "?") > 0 Then
MsgBox "? ist enhalten"
Else
MsgBox "nix da"
End If
End Sub

cu Micha

Antwort 4 von fekarin

Hallo,
das Fragezeichen "?" war nur ein Beispiel für ein Sonderzeichen.

Karing

Antwort 5 von fekarin

Hallo Micha,
ich habe deine "If Then Else" Anweisung mit einem anderen Sonderzeichen getestet, funktioniet super.

Danke noch mal

mfg
Karin