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

Forumthread: "Verruschen" eines Makros verhindern

"Verruschen" eines Makros verhindern
Rudi
Hi,
in einem Tabellenblatt wird die Spalte G:I ausgeblendet, mit dem Befehl:

Sub Ausblenden()
Columns("G:I").Select
Selection.EntireColumn.Hidden = True  'False
Range("A1").Select
End Sub

Wie bekomme ich diesen Befehl so hin, dass immer noch die richtigen Spalten ausgeblendet werden, wenn jemand davor Spalten einfügt.
Kann man da die Überschrift der Spalte zur Bedingung machen?
Also G heißt Privatnummer Projektleiter und G heißt Privatmail Projektleiter.
Bitte nicht über Sinn und Unsinn des Befehls Spalte Ausblenden nachdenken - Das Ganze ist komplexer aufgebaut - hab nur mein Problem rausgepickt.
Servus
Rudi
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: "Verruschen" eines Makros verhindern
PeterW
Hallo Rudi,
natürlich kannst du jede beliebige Zelle einer Spalte als Bedingung dafür nehmen, ob sie ein- oder ausgeblendet werden soll. Folgendes Beispiel kannst du bestimmt deiner komplexen Aufgabenstellung anpassen.

Sub SpalteWeg()
Dim iCol As Integer
For iCol = 1 To 256
If Cells(1, iCol) = "Privatnummer Projektleiter" Then
Columns(iCol).Hidden = True
End If
Next
End Sub

Gruß
Peter
Anzeige
AW: "Verruschen" eines Makros verhindern
Rudi
Hallo Peter,
danke funktioniert!
Nur leider bin ich eine Niete mit VBE.
Wie lautet denn bitte der entsprechende Befehl zum Wiedereinblenden der Spalte
Projektleiter Privatnummer ?
Servus
Rudi
AW: "Verruschen" eines Makros verhindern
PeterW
Hallo Rudi,
ich würde es versuchen mit:

Sub Spaltewiederda()
Dim iCol As Integer
For iCol = 1 To 256
If Cells(1, iCol) = "Privatnummer Projektleiter" Then
Columns(iCol).Hidden = False
End If
Next
End Sub

Gruß
Peter
Anzeige
Geholfen
Rudi
Danke Peter
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
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