PNG32 PNG32 PNG32 PNG32
PNG32
Forum Excel, VBA, VSTO, Exceltips, Excelhj�lp PNG32 drivs av Excelspecialisten    Logga in     English
PNG32
PNG32 PNG32
PNG32

Logga in

PNG32

Du är inte inloggad. Logga in eller registrera dig för att skriva inlägg eller svara på inlägg.

För frågor om forumet, kontakta oss på webmaster@excelforum.se

Du är inte inloggad. Logga in eller registrera dig för att skriva inlägg eller svara på inlägg.

För frågor om forumet, kontakta oss på webmaster@excelforum.se

PNG32 PNG32
PNG32 PNG32
PNG32

Excelforum

PNG32

 
ForumForumDiskussionerDiskussionerVBAVBAÄndra caption på kontroll från VBA kodÄndra caption på kontroll från VBA kod
Föregående Föregående
 
Nästa Nästa
Nytt inlägg
 2009-01-15 13:59
 

Jag har en mängd Checkbox kontroller i mitt excelblad som jag vill iterera igenom från en VBA sub och ändra caption. Men jag kommer inte åt egenskapen caption då klassen shape inte har någon sådan. Kan man typändra en shape till en checkbox i VBA och på så sätt komma åt egenskapen?

Dim i As Integer

 

Dim shp As Shape

For i = 427 To 500
        Set shp = ActiveSheet.Shapes("CheckBox" & i)
Next i

/Oskar


Oskar Folkesson

Excelforum drivs av Excelspecialisten som bedriver utveckling av program, utbildning samt support och hjälp i Excel och VBA.

www.excelspecialisten.se

Nytt inlägg
 2009-01-15 14:13
Accepterat svar 

Testa detta        Dim shp As OLEObject
   
    For Each shp In ActiveSheet.OLEObjects
        If shp.progID = "Forms.CheckBox.1" Then shp.Object.Caption = "ny text"
    Next shp

Nytt inlägg
 2009-01-15 14:32
 

Det fungerade utmärkt. Dessvärre behöver jag även ändra egensken LinkedCell vilket inte finns med i klassen OLEObject så det lutar lite åt att jag kanske måste göra en typändring (type cast) till Checkbox iaf. 

/Oskar


Oskar Folkesson

Excelforum drivs av Excelspecialisten som bedriver utveckling av program, utbildning samt support och hjälp i Excel och VBA.

www.excelspecialisten.se

Nytt inlägg
 2009-01-15 15:06
 

Det behövdes faktiskt ingen typändring. Det var så knepigt att det räckte med:

shp.LinkedCell

Då kom man åt egenskapen trots att det krävdes att man skrev

shp.Object.Caption

För att komma åt caption. Så det var ganska enkelt egentligen men det är ju det mesta när man vet hur man gör.

 

/Oskar


Oskar Folkesson

Excelforum drivs av Excelspecialisten som bedriver utveckling av program, utbildning samt support och hjälp i Excel och VBA.

www.excelspecialisten.se

Föregående Föregående
 
Nästa Nästa
ForumForumDiskussionerDiskussionerVBAVBAÄndra caption på kontroll från VBA kodÄndra caption på kontroll från VBA kod

PNG32 PNG32
Excelforum drivs av Excelspecialisten som bedriver utbildning i Excel och VBA, tillhandahåller support och hjälp med Excel, utvecklar program i Excel. Är ni i behov av en konsult inom Excel, VBA eller VSTO, eller söker en excelkurs, kontakta oss.
Copyright 2013 ExcelSpecialisten XLS AB   Användarvillkor  Personliga uppgifter