Kan ikke navigere

Prøv i et nyt projekt, her fungerer det fint.

Ja, jeg har heller ingen problemer...

Oh, en lille detalje, der måske kan være problemet: Hvis du har et eller flere ark, der er skjutle, så virker...

Application.CommandBars("Workbook Tabs").Controls(16).Execute

...ikke...

Så skal du bruge:

Application.CommandBars("Workbook Tabs").ShowPopup

Sub Vis_alle_ark()
     
      Dim WS As Worksheet
      Dim Counter As Long

      For Each WS In ActiveWorkbook.Worksheets
            If WS.Visible <> xlSheetVisible Then Counter = Counter + 1
      Next

      If ActiveWorkbook.Sheets.Count > 16 And Counter = 0 Then
            Application.CommandBars("Workbook Tabs").Controls(16).Execute
      Else
            Application.CommandBars("Workbook Tabs").ShowPopup
      End If

      Set WS = Nothing

End Sub

Hvorfor forsvandt mine indrykninger?!?

Nåh, koden er ikke så indviklet, så mon ikke du kan gennemskue den alligevel :-)

Opdater skærm og de kommer igen, er kun når man lige har sendt indrykninger forsvinder.

Jan

Yep, see that now :-)

Hmmm. Det virker sådan set - men ikke, når jeg bruger genvejstasten (Ctrl+i). Og det vil jeg jo gerne, for det vil jo gøre det hurtigere at navigere i projektmappen.

Kan du ikke bare tildele den genvejskombination til makroen???

Har jeg forsøgt, men det virker ikke. Boksen kommer fint frem, men jeg kan ikke navigere. Hvis jeg kører makroen uden brug af genvejstast, virker det,  som det skal.

Hmmm.... underligt...
Jeg har lige forsøgt, at tildele markoen genvejstasten [CTRL] + [i] her hos mig selv, og der virker det uden problemer...
...jeg kan fint benytte pile tasterne til at navigere op og ned i listen...
...så, det kan jeg ikke lige svare på - det må være noget hos dig selv, for makroen virker.

Hej
Det er også min oplevelse, at jeg aktivere via genvejstasten og med piletasterne navigere op og ned mellem de forskellige ark, men jeg kan ikke vælge et af arkene. Kan du det?

Yep - har lige testet igen...

jeg benytter pile tasterne til at vælge et ark, og når jeg har markeret et ark, så trykker jeg [Enter] og arket bliver valgt.