Werkblad tactisch verbergen

[conceal]

Hi,

Om m'n programma sneller te maken en omdat het in feite niks toevoegt wil ik graag een werkblad verbergen voor de gebruiker. Niettemin maak ik wel veel gebruik van de volgende termen in m'n programmatuur:

Sheets("test").Select
rijen = Cells(1, 1).End(xlDown).Row
kolommen = Cells(1, 1).End(xlToRight).Column

en

    For j = 1 To kolommen
        Sheets("test").Cells(i, j) = Sheets("test").Cells(i, j) - minimum
    Next j

Is er een mogelijkheid om het tactisch te verbergen zonder dat m'n programmatuur niet meer te gebruiken is? Ik heb namelijk het volgende tevergeefs geprobeerd:

Worksheets(2).Visible = False

Alvast bedankt!!!

Groet,
Maikel

 

[WinteE]

Voor de goede code kun je eenvoudig de macrorecorder gebruiken ( Hidden ipv Visible ).

Probeer geen .Select te gebruiken. Beter

A = Worksheets("Blad1").Cells()

dan

Worksheet("Blad1").Select
A = Cells()

 

[Wigi]

    For j = 1 To kolommen
        Sheets("test").Cells(i, j) = Sheets("test").Cells(i, j) - minimum
    Next j

Je gebruikt hier code waarvan ik in een andere topic van jou al aangegeven heb dat er een beter en sneller alternatief is.

Wigi

 

[conceal]

Hi WinteE en Wigi,

Inmiddels heb ik de programmatuur aangepast en alle ongewenste 'select'-verwijzingen vervangen. Nu werkt het programma ook met een verborgen werkblad. Nu nog steeds proberen sneller te maken. Bedankt voor jullie antwoorden!!!

Groet,
Maikel