Avatar billede palle_ib Nybegynder
12. april 2007 - 03:03 Der er 1 kommentar og
1 løsning

ActiveSheet.DrawingObjects.Select (Gå til - objekter)

Jeg har optaget mig frem til følgende kode, men har desværre måtte sande at der er forskel på hvad jeg har optaget og hvad makroen efterfølgende gør.

Hvis jeg laver en "GÅ TIL" og der vælger objekter, så bliver de billeder jeg har placeret på mit regneark valgt og ikke de Combobokse mm.

Afspiller jeg efterfølgende koden:
ActiveSheet.DrawingObjects.Select
Så vælges både billeder og combobokse mm.

Har herefter forsøgt mig med:
    Set mydocument = wksHyboxDiagram
    mydocument.Shapes.SelectAll
men her kommer fejlen Runtime 7 (Out of memory), hvilket måske kunne skyldes at jeg har mange skjulte billeder på arket også.

Hvordan får jeg fat i de på arket placerede billeder, (og ikke combobokse, checkbokse og commandbuttons) med så simpelt et kald som overhovedet muligt. Vær opmærksom på at jeg har skjulte billeder på arket også.
Avatar billede supertekst Ekspert
12. april 2007 - 14:09 #1
Prøv evt. med dette:

Sub MarkerBilleder()
Rem "Gennemgå alle shapes på arket"
    For Each sh In ActiveSheet.Shapes
        navn = sh.Name
Rem Hvis navnet på Shape IKKE er "Picture" - så skjul dette
        If Left(navn, 7) <> "Picture" Then
            sh.Visible = False
        End If
    Next

Rem Marker alle "billeder"
    ActiveSheet.DrawingObjects.Select
End Sub

Sub visAlt()
    For Each sh In ActiveSheet.Shapes
        sh.Visible = True
    Next
    Cells(1, 1).Select
End Sub
Avatar billede palle_ib Nybegynder
28. juni 2007 - 23:51 #2
Virkede ikke dit forlagt.
En ting der dog uforklarligt nok virkede var hvis man samlede alle objekterne og så skiftede mellem to ark så beholdt den "kun" markeringen på de rigtige DrawingObjects.
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