Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

VBA: Funktion "beginnt nicht mit" einer Zelle darstellen

0 views
Skip to first unread message

Okko

unread,
Dec 13, 2007, 11:01:09 AM12/13/07
to
Hallo,

wenn eine Zelle nicht mit einer bestimmten Zeichenkette beginnt, so soll
etwas bestimmtes ausgeführt werden.

Dies sollte analog zu u.a. "Beginnt mit"-Funktion funktioniern.
If Cells(i, 9).Value Like "MOD*" Then
Leider funktioniert folgendes nicht:.
If Cells(i, 9).Value NOT Like "MOD*" Then

Kann jemand helfen?
Gruß
Okko

Alexander Wolff

unread,
Dec 13, 2007, 11:11:20 AM12/13/07
to
wenn eine Zelle nicht mit einer bestimmten Zeichenkette beginnt, so
> soll etwas bestimmtes ausgeführt werden.
>
> Dies sollte analog zu u.a. "Beginnt mit"-Funktion funktioniern.
> If Cells(i, 9).Value Like "MOD*" Then
> Leider funktioniert folgendes nicht:.
> If Cells(i, 9).Value NOT Like "MOD*" Then

Für <Is> und <Like> mussst Du entweder die Komplemente schon in den Termen
schaffen (es gibt kein NOT) - oder einfach sagen:

If Cells(i, 9).Value Like "MOD*" Then Else

und die Then-Bedingung dabei leer lassen und <Else> füllen.

Da ich nicht so fit in VBA bin, lasse ich mich natürlich gern eines Besseren
belehren!
--
Moin+Gruss Alexander - MVP for MS Excel - www.xxcl.de - mso2000sp3 --7-2


Okko

unread,
Dec 13, 2007, 11:25:04 AM12/13/07
to

"Alexander Wolff" wrote:

Danke für den Tip!!!
Die Dinge können ja so einfach sein.

Gruß
Okko

Michael v. Fondern

unread,
Dec 14, 2007, 1:44:59 AM12/14/07
to
Hallo Alexander & Okko,

> wenn eine Zelle nicht mit einer bestimmten Zeichenkette beginnt, so
>> soll etwas bestimmtes ausgeführt werden.
>>
>> Dies sollte analog zu u.a. "Beginnt mit"-Funktion funktioniern.
>> If Cells(i, 9).Value Like "MOD*" Then
>> Leider funktioniert folgendes nicht:.
>> If Cells(i, 9).Value NOT Like "MOD*" Then
>
> Für <Is> und <Like> mussst Du entweder die Komplemente schon in den Termen
> schaffen (es gibt kein NOT) - oder einfach sagen:
>
> If Cells(i, 9).Value Like "MOD*" Then Else
>
> und die Then-Bedingung dabei leer lassen und <Else> füllen.
>

Waas spricht gegen

If NOT(Cells(i, 9).Value Like "MOD*") Then
...

?

Gruße

- Michael -

Alexander Wolff

unread,
Dec 14, 2007, 4:00:26 AM12/14/07
to
>> Für <Is> und <Like> mussst Du entweder die Komplemente schon in den
>> Termen schaffen (es gibt kein NOT) - oder einfach sagen:
>>
>> If Cells(i, 9).Value Like "MOD*" Then Else
>>
>> und die Then-Bedingung dabei leer lassen und <Else> füllen.
>>
> Waas spricht gegen
>
> If NOT(Cells(i, 9).Value Like "MOD*") Then

Das würde ich als Komplement des Terms (bzw. Ausdrucks) bezeichnen :-)

Hübscher als ... Then Else ... ist es allemal.

0 new messages