Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Versions-Konflikt?

Forumthread: Versions-Konflikt?

Versions-Konflikt?
21.08.2017 22:00:42
Lorenz
Hallo werte Helfende
Im Excel 2013 funktionierte es noch. Im Excel 2016 leider nicht mehr.
Sub TagWeg()
Dim NameRow As Variant, NameRowEnd As Variant, intRow As Integer
getMoreSpeed True
Cells.EntireColumn.Hidden = False
Range(Cells(1, 1), Cells(89, 1)).Rows.Hidden = False
If IsEmpty(Range(Cells(6, 19), Cells(89, 19))) Then
Range("DA:EV,FM:GQ,HX:XIV").EntireColumn.Hidden = True
Else
Range("S:U,DA:EV,FM:GQ,HX:IV").EntireColumn.Hidden = True
End If
intRow = 55
Do Until Left(Cells(intRow, 1), 4) = "Name" Or Cells(intRow, 1) = 0
intRow = intRow + 1
Loop
NameRow = Cells(intRow, 1).Address(False, False)
Range(NameRow & ":A509").EntireRow.Hidden = True      

Erkennt vielleicht jemand das Problem?
vielen Dank im voraus & Gruß
Lorenz
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Versions-Konflikt?
22.08.2017 05:58:32
Luschi
Hallo Lorenz,
bei mir klappt diese Vba-Zeile ohne meckern:
Range(NameRow & ":A509").EntireRow.Hidden = True
in Excel 2013 und Excel 2016!
Gruß von Luschi
aus klein-Paris
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige