Twoje PC  
Zarejestruj się na Twoje PC
TwojePC.pl | PC | Komputery, nowe technologie, recenzje, testy
B O A R D
   » Board
 » Zadaj pytanie
 » Archiwum
 » Szukaj
 » Stylizacja

 
M E N U
  0
 » Nowości
0
 » Archiwum
0
 » Recenzje / Testy
0
 » Board
0
 » Rejestracja
0
0
 
Szukaj @ TwojePC
 

w Newsach i na Boardzie
 
OBECNI NA TPC
 
 » NimnuL 16:14
 » resmedia 16:14
 » Markizy 16:13
 » rad 16:05
 » gigamiki 16:03
 » alien1 16:01
 » kyusi 15:59
 » bajbusek 15:59
 » esteban 15:56
 » hokr 15:45
 » Jumper 15:45
 » abes99 15:43
 » ligand17 15:42
 » Artaa 15:41
 » P_M_ 15:39
 » Kenjiro 15:36
 » dugi 15:35
 » exmac 15:35
 » rulezDC 15:33
 » P@blo 15:33

 Dzisiaj przeczytano
 41143 postów,
 wczoraj 25974

 Szybkie ładowanie
 jest:
włączone.

 
ccc
TwojePC.pl © 2001 - 2024
A R C H I W A L N A   W I A D O M O Ś Ć
    

Excel - tworzeni arkuszy na podstawie listy danych - proszę o pomoc , Janusz 11/01/10 14:35
Mam prośbę, może ktoś mógłby mi pomoc bo VBA, to jeszcze nie jest mój poziom znajomości excela. Chodzi mi o utworzenie makra, które na podstawie listy danych /komórki zawierające Id klientów/ tworzy dla każdego klienta nowy arkusz kalkulacyjny i nazywa go tak samo jak Id klienta zapętlone od pierwszego id klienta z zakresu do ostatniego. Wszystko w ramach jednego skoroszytu /arkusz z listą i nowopowstałe arkusze również/. Z góry dziękuję za pomoc.

Zawsze warto być człowiekiem,
choć tak łatwo zejść na psy.
/Autsajder, Dżem/

  1. Hmmm... , ligand17 11/01/10 14:43
    Wpisz w Google "VBA Excel new worksheet" i masz wszystko pod ręką.
    W szczególności takie komendy, jak:
    Workbooks.Add

    ActiveWorkbook.SaveAs Filename:=fname, FileFormat:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False

    ActiveWindow.Close

    + pętla:
    For i = 1 To liczbaklientów
    ...
    ...
    ...
    Next i

    No i podstawy operacji na komórkach.

    1. Acha , ligand17 11/01/10 14:45
      Chcesz mieć wszystko w jednym pliku? Bo jeżeli tak, to pamiętaj, że liczba możliwych "worksheets" jest ograniczona wielkością pamięci - więc czasem może działać, a czasem nie.

    2. Grrrrr , ligand17 11/01/10 14:46
      Błąd, zamiast Workbooks.Add powinno być:

      Worksheets.Add (After:=Worksheets(Worksheets.Count)).Name = IDKlienta

    
All rights reserved ® Copyright and Design 2001-2024, TwojePC.PL