Dansk Regneark Forum
  Hjælp Hjælp  Søg i forum   Arrangementer   Opret ny bruger Opret ny bruger  Log ind Log ind


Emne lukketMakro
 Besvar Besvar
Forfatter
  Emne Søg Emne Søg  Emne funktioner Emne funktioner
Bøffe Se dropdown
Forum Begynder
Forum Begynder
Avatar

Medlem: 13.Okt.2017
Land: Danmark
Status: Offline
Point: 16 		Direkte link til dette indlæg Emne: Makro
    Sendt: 19.Okt.2017 kl. 15:39
Hej

Jeg prøver at lave en makro som skjuler en bestemt kolonne.

Sub Hide_Column()
Range("AJ").Select
Selection.EntireColumn.Hidden = True
End Sub

Men det virke ikke, hvad gør jeg forkert.Angry 

mht 

Steen
Til top



Til top
EXCELGAARD Se dropdown
Platin bruger
Platin bruger


Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5417 		Accepteret svar Accepteret svar
Direkte link til dette indlæg Sendt: 19.Okt.2017 kl. 18:05
Flere muligheder: 
Range("AJ:AJ").EntireColumn.Hidden = True
Columns("AJ").EntireColumn.Hidden = True
Columns(36).EntireColumn.Hidden = True
Og, hvis du på noget tidspunkt benytter 
.Select
i din kode, så har du lavet dårlig kodning!
Til top
ThorØstergaard Se dropdown
Bronze bruger
Bronze bruger


Medlem: 13.Sep.2017
Land: Danmark
Status: Offline
Point: 59 		Direkte link til dette indlæg Sendt: 19.Okt.2017 kl. 17:25
Jeg ville nok skrive

Sub Hide_Column()
Range("AJ1").EntireColumn.Hidden = True
End Sub
Til top
ThorØstergaard Se dropdown
Bronze bruger
Bronze bruger


Medlem: 13.Sep.2017
Land: Danmark
Status: Offline
Point: 59 		Direkte link til dette indlæg Sendt: 19.Okt.2017 kl. 17:27
Range("AJ") er ikke nogen celle - Range skal have en fuld cellereference - derfor Range("AJ1").

Og så undgår jeg at bruge .Select, da det flytter på brugerens markør, hvilket i min optik er dårlig stil (og så går det også lidt ud over kodens performance).
Til top
EXCELGAARD Se dropdown
Platin bruger
Platin bruger


Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5417 		Accepteret svar Accepteret svar
Direkte link til dette indlæg Sendt: 19.Okt.2017 kl. 18:05
Flere muligheder: 
Range("AJ:AJ").EntireColumn.Hidden = True
Columns("AJ").EntireColumn.Hidden = True
Columns(36).EntireColumn.Hidden = True
Og, hvis du på noget tidspunkt benytter 
.Select
i din kode, så har du lavet dårlig kodning!
Husk, at trykke på [Tak], hvis du kan lide et indlæg.
Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag.
Til top
 Besvar Besvar

Skift forum Forum tilladelser Se dropdown

© 2010 - 2024 Dansk Regneark Forum - en del af Excel-regneark.dk