Toon posts:

[VBA/Excel] Instructie selecteren

Pagina: 1
Acties:

Verwijderd

Topicstarter
Momenteel ben ik bezig met een macro in Visual Basic voor Excel, daarbij loop ik tegen een probleem aan.

Ik wil graag verschillende subroutines laten uitvoeren voor de volgende situaties:

1. De string bevat een kleine letter;
2. De string bevat een hoofdletter;
3. De string bevat een cijfer;
4. De string bevat een spatie;
5. De string is leeg.

De string is altijd 1 positie lang, tenzij deze leeg is natuurlijk. De inhoud van de string boeit me niet, maar het soort inhoud dus wel.

Nu mijn vraag:

Is er een makkelijk manier om met behulp van select case op het type teken (als bovenstaand) te selecteren ?

Indien nee, is er dan een andere (makkelijke) manier ?

  • Crazy D
  • Registratie: Augustus 2000
  • Laatst online: 17:24

Crazy D

I think we should take a look.

Op vrijdag 22 februari 2002 22:43 schreef Big Bad Wolf het volgende:
Nu mijn vraag:

Is er een makkelijk manier om met behulp van select case op het type teken (als bovenstaand) te selecteren ?

Indien nee, is er dan een andere (makkelijke) manier ?
Dan is mijn vraag terug: wat heb je in gedachten om het op te lossen? Ik neem aan (hoop !) dat je niet van plan was een select case als case "a", case "b", case "A", etc, neer te gaan zetten... maar waar denk je zelf aan?
2 Hint:
1. ascii waardes zou een mogelijkheid zijn
2. bij een case kun je ook "To" gebruiken, dus bv Case "a" To "e" om a t/m e af te vangen

Exact expert nodig?


Verwijderd

code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
sub DoeDeSamba(strChar as string)

if strChar = "" then
   msgbox "LEEG!"
elseif (asc(strChar) > 47) and (asc(strChar) < 58) then
   msgbox "CIJFER!"
elseif ucase(strChar) = strChar then
   msgbox "HOOFDLETTER!"
else
   msgbox "kleine letter of leesteken!"
end if

msgbox "Dit is zo simpel dat je het zelf ook kan verzinnen!", _
     vbCritical, "Denkzelfeensna!"
end sub

>:)

  • Crazy D
  • Registratie: Augustus 2000
  • Laatst online: 17:24

Crazy D

I think we should take a look.

Awhh nou geef je toch een copy-paste antwoord. Zo leert ie de logica nooit ;)

Exact expert nodig?


  • Quenda
  • Registratie: Januari 2000
  • Niet online

Quenda

 

(overleden)
Op zaterdag 23 februari 2002 13:18 schreef Crazy_D het volgende:
Awhh nou geef je toch een copy-paste antwoord. Zo leert ie de logica nooit ;)
Ach, er zijn nog wel een paar andere mogelijkheden voor hem over... Hij kan bijvoorbeeld ook een aantal strings vullen met de chars die hij wil opzoeken en dan controleren of ze in zijn string zitten met een InStr ... Kan 'ie mooi uit gaan vogelen hoe hij dat moet doen..