napisał: gilbert postów: 10
umieszczony: 29 grudnia 2005 22:49
|
|
Dzięki
Myślę że to mogłoby być to. Plik jest otwarty, ale go nie widać
A czy tak wykonane makro nie będzie np wolniej działać??
Jeszcze jedno pytanko odnośnie funkcji GetValue tzn WriteValue:
Bardzo przydałaby mi się funkcja która zapisze do pliku bez jego otwierania kilka komórek w wierszu np Range("A22:K22") --> GetValue pokazuje tylko jak odczytać komórki.
Efekt jaki chciałbym osiągnąć jest taki, że jak myślę, plik mógłby być jadnocześnie uzupełniany przez więcej niż 1 osobę tzn makro mogłoby działać niezależnie od tego czy już go ktoś inny używa czy nie.
Gdyby dało się coś takiego zrobić to dodatkową kwestią byłoby znalezienie w tym zamkniętym pliku pierwszego wolnego wiersza i zapisanie danych właśnie w tym wierszu.
Jeśli ktoś mógłby pomóc to chętnie skorzystam z kodu lub wskazuwek jak to zrobić, bo niestety nie jestem ekspertem i nie potrafie przekształcić funkcji GetValue na WriteValue
Pozdrawiam |
|
napisał: Trebor postów: 1209
umieszczony: 28 grudnia 2005 21:03
|
|
Witam!!
może coś w tym stylu
Dim appXL As Excel.Application
Set appXL = CreateObject("Excel.Application")
appXL.Workbooks.Open ("G:\Moje dokumenty\daty.xls")
appXL.Range("A1").Copy
appXL.Quit
appXL.Workbooks.Open ("G:\Moje dokumenty\data.xls")
appXL.Range("A8").Select
appXL.ActiveSheet.Paste
appXL.ActiveWorkbook.Save
appXL.Quit
Set appXL = Nothing
Pozdrawiam |
|
napisał: gilbert postów: 10
umieszczony: 28 grudnia 2005 18:06
|
|
Cześć,
Wyłączone mam odświerzanie ekranu, ale pomimo tego na pasku widoczne są wszystkie okna, które obrabiam. Mam więc: 1. plik z makrem, 2. plik z zestawieniem, do którego wpisuje tylko że powstał taki a taki plik i było w nim coś tam, 3. plik który tworze importując pilczek tekstowy i obrabiam w nim wstępnie dane, 4. plik, który tworze zapisując go potem jako właściwy dokument na dysku.
Chodzi o to, że to makro podczas swojego działania, tworzy wiele tych końcowych dokumentów (czasem za 1 razem robi ich ponad 200), które po zapisaniu zamyka. Jak dla mnie, mógłby ich wogóle nie pokazywać na pasku, bo po paru sekundach obróbki i tak plik zamykam. Jak się nie da albo z tym jest dużo roboty, to się nie będę przejmował. Pomruga na pasku troche i już 
Cytat:
Podoba mi się funkcja GetValue i zastanawiam się czy zadziała na tej samej zasadzie funkcja WriteValue ??
Pozdrawiam |
|
napisał: gilbert postów: 10
umieszczony: 24 grudnia 2005 17:32
|
|
Witam
Mam takie makro, które korzysta z wielu plików excela. Działa ono tak, że każde otwarte okno staje się aktywne, przełączam się między oknami aktywizując je, coś z niektórych pobieram aktywizując je, do innych zapisuje też aktywizując je.
Chciałbym zrobić tak, że przy otwarciu okna, przypisuje go do zmiennej nie przełączać się między oknami.
Mam więc coś takiego:
Public Wd1 As Window, Wd2 As Window
Workbooks.Open (Plik1)
Set Wd1 = ActiveWindow
Workbooks.Open (Plik2)
Set Wd2 = ActiveWindow
'potem np robie tak:
Wd1.Range("A35").Copy Wd2.Range("A1")
Można otworzyć plik excela, którego wogóle nie byłoby widać na pasku jednocześnie przypisując go do zmiennej??
Żeby było to coś takiego:
Wd1 = Workbooks (Plik1)
Wd2 = Workbooks (Plik2)
Albo, czy wogóle muszę otwierać taki plik??
I co w przypadku, kiedy tworzę nowy plik?? też chciałbym, żeby go nie właściwie nie było. Wystarczy mi tylko wynik zapisany na dysku.
POzdrawiam, Gilbert |
|
 wstecz 1 dalej  wszystkich stron: 1
|