• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

macro's op meerdere tabbladen van toepassing laten zijn

Status
Niet open voor verdere reacties.
R

roeldahool

Gebruiker
Lid geworden
19 nov 2007
Berichten
40
klik hier om de post te lezen waar deze vraag om draait.

het antwoord van hans is goed bruikbaar maar.....

ik heb 200 :eek: tabbladen. De macro zoals gegeven door hans moet op 100 van die tabbladen van toepassing zijn.

maar hoe?

wie?
 
Code: 
Sub ZoomInstellen()

    Dim i As Integer
    Dim dZoom As Double
    
    dZoom = ActiveWindow.zoom
    
    For i = 1 To .Sheets.Count
        Sheets(i).Activate
        ActiveWindow.zoom = dZoom
    Next

End Sub

Gebruik in het vervolg de zoekfunctie van het forum. Lussen doorheen cellen, sheets, ... worden hier dagelijks meerdere keren neergepend.

Wigi
 
Status
Niet open voor verdere reacties.
                    Steun ons                    

Nieuwste berichten

Terug
Bovenaan Onderaan