vbamania.pl
login:
hasło:
 
  *Rejestracja *Zapomniane hasło
 Dziś jest niedziela, 26 maja 2024 roku.
Ustaw jako stronę startową Ulubione Napisz
PowrótPowrót do serwisu  RegulaminRegulamin rssRSS

  tytuł wątku:
Wątki dyskusji

Zaznacz arkusze od do


otwartyotwarty rozpoczął: mic1@wp.pl postów: 2



napisał: admin
postów: 613


umieszczony:
13 marca 2023
10:21

edytowany:
13 marca 2023
10:23

  
Witam,

moze tak:

Sub ZaznaczanieArkuszy()

Dim sSheets() As String
Dim i As Long
Dim oW As Worksheet

Const z As Long = 3
Const lStart As Long = 1

ReDim sSheets(lStart To z)

'Tworzenie arkuszy
For i = lStart To z
    Set oW = ActiveWorkbook.Worksheets.Add(, ActiveWorkbook.Worksheets(ActiveWorkbook.Worksheets.Count))
    sSheets(i) = oW.Name
Next i

'Zaznaczanie
Sheets(sSheets).Select

End Sub



Cytat:
Witam.
w exelu mam makro które generuje arkusze w zależności od tego ile jest danych w pliku źródłowym -> zmienna "z" , czyli tworzy arkusze 1,2,3,......z
Potrzebuję aby na końcu były wszystkie aktywne tylko te są w skoroszycie jeszcze inne, efekt jakbym zaznaczał zakładki z shiftem albo ctrl
nie mam już pomysłu,
próbowałem pętli , z array ale coś robię nie tak bo na końcu zostaje aktywna tylko jedna

czy ktoś ma jakieś rozwiązanie?
napisał: mic1@wp.pl
postów: 1


umieszczony:
11 marca 2023
13:22

  
Witam.
w exelu mam makro które generuje arkusze w zależności od tego ile jest danych w pliku źródłowym -> zmienna "z" , czyli tworzy arkusze 1,2,3,......z
Potrzebuję aby na końcu były wszystkie aktywne tylko te są w skoroszycie jeszcze inne, efekt jakbym zaznaczał zakładki z shiftem albo ctrl
nie mam już pomysłu,
próbowałem pętli , z array ale coś robię nie tak bo na końcu zostaje aktywna tylko jedna

czy ktoś ma jakieś rozwiązanie?


<-wstecz  1  dalej->
wszystkich stron: 1


Sortuj posty: z