Corel FORUM Strona Główna Corel FORUM
Forum użytkowników programów firmy Corel. Grafika wektorowa, rastrowa i obróbka zdjęć cyfrowych

FAQFAQ  SzukajSzukaj  UżytkownicyUżytkownicy  GrupyGrupy
RejestracjaRejestracja  ZalogujZaloguj  DownloadDownload

Poprzedni temat «» Następny temat
wypełnianie tabeli za pomocą makra
Autor Wiadomość
mariano
Praktyk


Dołączył: 13 Wrz 2011
Posty: 62
Skąd: pomorskie
Wysłany: 2 Styczeń 2013, 21:01   wypełnianie tabeli za pomocą makra

Czy może ktoś mi pomóc w zrobieniu makra do automatycznego wypełniania tabeli na rysunkach. Problem zobrazowałem w załączniku - chodzi o wypełnianie rubryk tabeli.

makro dla tabelki.cdr
Pobierz Plik ściągnięto 502 raz(y) 166.23 KB

 
 
Cysorz 



Pomógł: 205 razy
Dołączył: 01 Sty 2011
Posty: 3137
Skąd: Kraków
Wysłany: 3 Styczeń 2013, 00:50   

v. 15 nie otwiera tego...
 
 
lamerson85
Fachowiec


Pomógł: 1 raz
Dołączył: 08 Lut 2012
Posty: 201
Skąd: Lublin
Wysłany: 3 Styczeń 2013, 08:22   

u mnie X4 otwiera ale ja nie wiem jak Ci kolego pomóc, jestem za cienki, też się uczę :D
 
 
mariano
Praktyk


Dołączył: 13 Wrz 2011
Posty: 62
Skąd: pomorskie
Wysłany: 3 Styczeń 2013, 16:44   

To przesyłam zrzut ekranu, może coś więcej to wam powie o co mi chodzi. Zrobiłem UserForma, który wypełniamy. Po wypełnieniu pól wpisy miałbyten UseForm zaimplementować do tabeli w miejsca zaznaczone na czerwono.

TABELA_MAKRO_ZRZUT.cdr
Pobierz Plik ściągnięto 525 raz(y) 89.93 KB

 
 
bidon184
[Usunięty]

Wysłany: 3 Styczeń 2013, 18:56   

yy,jak byś mi dał to w formie jakiegoś normalnego pliku podglądu to może coś bym wykombinował,natomiast polecenie ,zaimpletowania do userform jest dla mnie zagadką,ponieważ ja nie znam porogramu który był by wstanie zamienić pliki exe w czasie rzeczywistym :roll: ale powarzam nie widze tego screena więc nie będe się wymądrzał,jak byś dał zrzut normalny to może bym pomógł,ale ogólnie kojaże że ty chcesz wymusić na programie jakby własny profil,to się chyba niue da niestety, :roll:
 
 
mariano
Praktyk


Dołączył: 13 Wrz 2011
Posty: 62
Skąd: pomorskie
Wysłany: 3 Styczeń 2013, 20:02   

proszę w jpg

tabela.jpg
Pobierz Plik ściągnięto 522 raz(y) 88.1 KB

 
 
bidon184
[Usunięty]

Wysłany: 3 Styczeń 2013, 21:28   

aa,ci chodzi o opis ,to takiego makra nie ma i nie będzie,zresztą popieram zablokowanie takich makr,znaczy można zrobić,ale i tak jest to już zablokowane w systemach,nie kumam po co ci takie makro,dla siebie???
 
 
mariano
Praktyk


Dołączył: 13 Wrz 2011
Posty: 62
Skąd: pomorskie
Wysłany: 4 Styczeń 2013, 00:27   

tak dla mnie - usprawni mi to pracę, zamiast wypełniać każdą tabelkę osobno wpiszę w userformie dane i tabelki wypełnione
 
 
chezare 



Pomógł: 402 razy
Dołączył: 24 Gru 2010
Posty: 4551
Skąd: Grodzisk Mazowiecki
Wysłany: 4 Styczeń 2013, 18:10   

Bidon, od kiedy to używanie VBA w Corelu, Office czy np. CAD jest zabronione?
Po to jest żeby sobie ułatwić pracę.
UserForm to jak sama nazwa wskazuje formularz skonstruowany przez użytkownika i nie powoduje żadnej ingerencji w kod programu.
Ponieważ wiem, że nie masz czym otworzyć cdra to niżej masz obrazek z tym co w nim było.


Mariano, te rysunki są zawsze na stronie tej samej wielkości i tabelka jest zawsze w tym samym miejscu?
 
 
mariano
Praktyk


Dołączył: 13 Wrz 2011
Posty: 62
Skąd: pomorskie
Wysłany: 6 Styczeń 2013, 13:16   

tak tabelka jest zawsze w tym samym miejscu, ale ilość stron zależy od ilości kondygnacji ponieważ każdą kondygnację budynku rysuję na osobnej stronie
 
 
Stipa 
Doradca
fan corela od wersji 2.0


Wersja CorelDRAW: X7
Pomógł: 1 raz
Dołączył: 29 Gru 2012
Posty: 100
Skąd: Bytów
Wysłany: 8 Styczeń 2013, 09:17   

Do tego zadania nie trzeba armaty VBA. Wystarczy rejestrator makr klawiaturowo-myszkowych. Od lat nie potrafię pracować bez programu EZ Macros, który jest stworzony dla twojego problemu. Tak nim robię taką rzecz:
1. Shift F4 (zoom do wielkosci kartki)
2. przesunięcie obiektu z klawisza ustawiam na 90 mm
3. Duplikuję i przesuwam w prawo te trzy czarne napisy
4. Mając je na desktopie edytuję je do nowych danych
5. I teraz zaczynam zabawę z EZ Macros - włączam nagrywanie makra wyzwalanego sekwencją alt~
6. zaznaczam po kolei czarne napisy w tabelce metodą "prostokąta z altem" w trybie strzałki i je usuwam
7. tą samą metodą zaznaczam teksty na desktopie
8. Duplikuję je i kliknięciem w kursor przesuwam z powrotem do tabelki
9. PageDown
10. Klawisz Break kończy nagrywanie
11. Jestem już ma 2 stronie. Gdy teraz nacisnę alt~ to wszystko mi się samo błyskawicznie wykona, a ja będę na 3 stronie.
W całej operacji ważna jest metoda zaznaczania - "prostokąt z altem" wypełniający całe wnętrze komórki tabelki zapewni, że każdy obiekt, który się w niej znajduje zostanie zaznaczony. Gdybyśmy zaznaczali kliknięciem, to okazało by się, że w innym dokumencie kliknięcie było w pustkę i nic się nie zaznaczyło.
W swoim Win7 musiałem dodać EZMacros do wyjątków Kontroli Konta Użytkownika, bo inaczej program nie działa. Po usunięciu pliku unezmac.ini z katalogu windows trial działa bez ograniczeń czasowych.
 
 
mariano
Praktyk


Dołączył: 13 Wrz 2011
Posty: 62
Skąd: pomorskie
Wysłany: 9 Styczeń 2013, 23:54   

Kolego nie rozumiem tych punktów które opisałeś:

2. przesunięcie obiektu z klawisza ustawiam na 90 mm

4. Mając je na desktopie edytuję je do nowych danych

6. zaznaczam po kolei czarne napisy w tabelce metodą "prostokąta z altem" w trybie strzałki i je usuwam


9. PageDown

11. Jestem już ma 2 stronie. Gdy teraz nacisnę alt~ to wszystko mi się samo błyskawicznie wykona, a ja będę na 3 stronie.
W całej operacji ważna jest metoda zaznaczania - "prostokąt z altem" wypełniający całe wnętrze komórki tabelki zapewni, że każdy obiekt, który się w niej znajduje zostanie zaznaczony. Gdybyśmy zaznaczali kliknięciem, to okazało by się, że w innym dokumencie kliknięcie było w pustkę i nic się nie zaznaczyło.
W swoim Win7 musiałem dodać EZMacros do wyjątków Kontroli Konta Użytkownika, bo inaczej program nie działa. Po usunięciu pliku unezmac.ini z katalogu windows trial działa bez ograniczeń czasowych.
 
 
Stipa 
Doradca
fan corela od wersji 2.0


Wersja CorelDRAW: X7
Pomógł: 1 raz
Dołączył: 29 Gru 2012
Posty: 100
Skąd: Bytów
Wysłany: 15 Styczeń 2013, 11:10   

Sorry, ale nie było mnie tu parę dni.

2. można obiekty przesuwać za pomocą strzałki kursora. Na górnej belce jest okienko, w ktorym ustawiamy wielkość tego przesunięcia.
4. Po przesunięciu na desktop edutyję te napisy, czyli piszę w nich to, co teraz ma być na wszystkich stronach dokumentu.
6. Narysuj sobie wiele obiektów na całej stronie. I teraz w trybie obiekt (strzałki) wciśnij Alt i lewy przycisk, przeciągnij kursor w prawo w dół. Narysował ci się przerywany prostokąt. Puść klawisz myszy, puść alt. Wszystko, co chociaż zostało "zahaczone" przez prostokąt jest zaznaczone. Bez alta zaznaczyłoby się tylko to, co w całości jest wewnątrz prostokąta.
9. Wciśnij Page down

11. Tu już nie potrafię inaczej opisać mogę opowiedzieć tel. 601-411-669
 
 
mariano
Praktyk


Dołączył: 13 Wrz 2011
Posty: 62
Skąd: pomorskie
Wysłany: 15 Styczeń 2013, 23:03   

dziękuję za wyjaśnienie teraz wiem o co chodzi
 
 
JacekS
Początkujący


Dołączył: 16 Sty 2013
Posty: 3
Skąd: Bytów
Wysłany: 16 Styczeń 2013, 09:52   

Jeśli się uda, to wciśnięcie Stipie "pomógł' would be appreciated ;-)
(ale temu u góry bo awaryjnie piszę z innego loginu).
 
 
Wyświetl posty z ostatnich:   
Odpowiedz do tematu
Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Nie możesz załączać plików na tym forum
Możesz ściągać załączniki na tym forum
Dodaj temat do Ulubionych
Wersja do druku

Skocz do:  

Powered by phpBB modified by Przemo © 2003 phpBB Group
Nowe zasady dotyczące cookies. Wykorzystujemy pliki cookies, aby nasz serwis lepiej spełniał Państwa oczekiwania. Można zablokować zapisywanie cookies, zmieniając ustawienia przeglądarki.
         
Strona wygenerowana w 0.19 sekundy. Zapytań do SQL: 14