Avatar billede kamak Praktikant
04. september 2006 - 15:12 Der er 8 kommentarer og
2 løsninger

VB i makro. Kan ikke bruge String-klassens metoder

Jeg skal i en makro undersøge indholdet i nogle celler men kan ikke bruge String. Jeg ved godt koden herunder ikke kan bruges til noget men det illustrerer mit problem.

Dim test As String
test = "1234"
If test.StartsWith("12") Then
End If
If test.Contains("23") Then
End If

Når jeg kører koden får jeg fejlen "Compile error" "Invalid qualifier" (test).

Skal man importere noget og hvor eller hvad er problemet?
04. september 2006 - 15:17 #1
Select Case Left(Range("A1").Value, 2)
    Case "12"
        MsgBox "Hello world 12"
    Case "23"
        MsgBox "Hello world 23"
End Select
04. september 2006 - 15:17 #2
fyld selv flere på.
Avatar billede kabbak Professor
04. september 2006 - 15:41 #3
mon ikke det er sådan kamak mener

Public Sub Tjek()
    If Left(Range("A1"), 2) = "12" Then
        MsgBox " den starter med 12"
    End If
    If InStr(1, Range("A1"), "23") Then
        MsgBox "den indeholder tallet 23"
    End If

End Sub
04. september 2006 - 15:44 #4
men det giver jo det samme Kabbak....!
Avatar billede kabbak Professor
04. september 2006 - 15:45 #5
nej du tjekker kun på de 2 første tegn
Avatar billede kamak Praktikant
04. september 2006 - 16:00 #6
Egentlig undrer det mig man ikke kan bruge f.eks. test.Contains("23") ligesom i alm. VB, men det kan man nok bare ikke så.
Men jeres kode-eksempler kan det som jeg havde brug for.

Tak for hjælpen :-)

Hvis kabbak også laver et svar kan i dele pointene.
Avatar billede kabbak Professor
04. september 2006 - 16:14 #7
KUN, hvis du  med Contains("23"), mente at hvis cellen et indeholdt 23 et eller andet sted, vil jeg have point.
04. september 2006 - 17:09 #8
sorry kabbak - jeg havde ikke set contains/instr delen først
Avatar billede bak Forsker
04. september 2006 - 22:34 #9
Hvad med Like funktionen
Test = "1234"
If test Like "12*" then
bla. bla.
End if
If test Like "*23*" then
bla.bla
End If
Avatar billede kamak Praktikant
05. september 2006 - 18:21 #10
smart bak :-) tak for det
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester