Avatar billede anton112 Nybegynder
08. april 2008 - 20:33 Der er 1 kommentar

Konvertere et antal ens kontrolelementer til et array (VBA)

Jeg har et større antal TextBox kontrolelementer, som vil blive kaldt noget i retning af

ArkivDag11, ArkivDag12, ArkivDag13,..ArkivDag17
ArkivDag21, ArkivDag22, ArkivDag23,..ArkivDag27
...
ArkivDag51, ArkivDag52, ArkivDag53,..ArkivDag57

Jeg vil gerne samle dem i et to-dimentionelt array, så jeg kan indeksere kontrolelementerne: ArkivDage(x,y).
Jeg har Office 2003 installeret.

Ifølge VBA hjælp skulle det kunne gøres ved
•    Dim MyObject As Object    ' Create object variable.
•    Set MyObject = Sheets(1)    ' Create valid object reference.

Hvis jeg koder:
    Dim X As TextBox
    Set X = ArkivDag11
får jeg fejlmeddelelsen: “>Run-time error 13: Type mismatch”
Kan I give mig et hint om hvordan jeg kommer videre?
Avatar billede kabbak Professor
08. april 2008 - 23:36 #1
Public Sub test()
    Dim MyObject As Object    ' Create object variable.
    Set MyObject = Sheets("Ark1")    ' Create valid object reference.
    Dim X As Object
    Set X = MyObject.OLEObjects("TextBox1").Object
    X.Text = "10"
    A = X.Value
End Sub
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
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

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