VBA werkblad selecteren

rikik · 21 jun 2017

Hey,

Ik heb onderstaande Macro gemaakt die mijn Sheet van naam veranderd naar Import IC.
Het probleem is dat mijn sheet telkens een random naam heeft.

Nu is het 327_prebook_2017062120170621135, maar volgende keer kan het 309_Prebook_65565665 zijn.
Hoe neem ik altijd het aanwezige blad?

Sub Test()
'
' Test Macro
'

'
Sheets("327_prebook_2017062120170621135").Select
Sheets("327_prebook_2017062120170621135").Name = "ImportIC"
Cells.Select
Cells.EntireColumn.AutoFit
Range("A5").Select
End Sub

Haije · 21 jun 2017

Rik,

moet je altijd het eerste of laatste of tiende of .... tabblad hernoemen?

rikik · 21 jun 2017

Ik heb telkens maar één tabblad ter beschikking.
Dus telkens het eerste.

E v R · 21 jun 2017

helpt dit al?

Code:

Sub Test()

With ActiveSheet
    .Name = "ImportIC"
    .Cells.EntireColumn.AutoFit
    '.Range("A5").Select
End With
End Sub

rikik · 21 jun 2017

Works like a charm.
Super bedankt

VBA werkblad selecteren

rikik

Gebruiker

Haije

Terugkerende gebruiker

rikik

Gebruiker

E v R

Terugkerende gebruiker

rikik

Gebruiker

Nieuwste berichten

Wij waarderen jouw privacy