Salte einblenden hinter die letzte Spalte?
20.04.2017 09:53:54
Nati
ich habe ein Sheet mit einem Button; beim Betätigen dieses Buttons soll eine Spalte eingeblendet werden; beim wiederholten Betätigen soll eine weitere Spalte eingeblendet werden und zwar immer hinter die letzt eingeblendete Spalte.
In den Spalten steht auch schon Text, eine Spalte steht für einen neuen Process:
Mein Code:
Public Sub AddingProcess()
Dim ws4 As Worksheet
Dim rng, rng2 As Range
Dim i As Integer
' Set ws4 = ThisWorkbook.Worksheets("Calculation")
For i = 9 To 19
If Columns(i).Hidden = False Then
Columns(i + 1).Hidden = False
End If
Next i
End Sub
Ich hoffe jeemand kann mir helfen und bin über jeden Rat dankbar.
Liebe Grüße
Nathalie
Anzeige