Najprościej? Połączyć arkusze (jako źródła tabelek) w Access i już z poziomu Access'a można sobie widokami (kwerendami) porobić co się chce - włącznie z szukaniem duplikatów. Rzeźbienie tego w Excelu to będzie więcej roboty (np. z tym szukaniem duplikatów).
Powinienem wyraźniej zaznaczyć, że chodzi o zatrzymanie procedury gdy plik jest używany przez kogoś innego. Rozumuję następująco On Error Resume Next Set plik = Workbooks("RAPORT DZIENNY.xls") If Err = 9 Then 'jeśli próba przypisania zakończona błędem On Error GoTo 0 Set plik = Workbooks.Open(Filename:=ThisWor... &...
Przykład korzystania z okna zapisywania z filtrem ZapiszJako = Application.GetSaveAsFilename(fileFi... Excel (*.xls), *.xls") I jeśli domyślna ścieżka i nazwa z komórki to sciezka = Application.DefaultFilePath & "\" nazwa = Range("A1").Value ZapiszJako = Application.GetSaveAsFilename(Initia...
W przykładzie, gdzie Wziąłes formuła, została funkcja zdefiniowana przez użytkownika(Suma_Koloru), przepisz je do Twojego skoroszytu
3. nowy skoroszyt zamknąć Na sam koniec nowo utworzony skoroszyt zamyka bez zapisywania go Jakie jest więc cel tworzenia nowego skoroszytu?
Czy usunięcie pozycji w rejestrze nie spowoduje komplikacji w działaniu Excela Nie.
Wypadałoby go skrócić, Można tak :please: jak na zrzucie :spoko: 1083288 żeby pobrać dane z innego skoroszytu Excel z wieloma arkuszami Nie potrzebujesz żadnych funkcji wyszukujących wystarczy bezpośrednie odwołanie, możesz zastosować odwołania tablicowe, albo import całych tabeli (czy faktur ?).
Bez "C:\" (plik musi być w tym samym katalogu!) Formuła musi wyglądać tak: ='[Plik.xls]Arkusz1'!$A$1 Zmieniasz tylko część: "Plik.xls" i "Arkusz1"
Podmień na [syntax=vbscript]NowaNazwa = ThisWorkbook.ActiveSheet.Range("A1").Val... & ".xlsm"[/syntax]
Tabelki nie mają żadnej nazwy Okazuje się, że jest inaczej: http://obrazki.elektroda.pl/4887606500_1... Z jednej strony powinno to ułatwić, z drugiej... te naaazwyyy :( Spróbuję napisać jakieś makro i najpierw je wszystkie uporządkować. Jakieś przeciwwskazania? Powinny być, jeśli gdzieś są one używane w odwołaniach (dot. również ew....
To powinno działać: [syntax=vb]Private Sub Workbook_Open() ActiveWindow.WindowState = xlMinimized WYDRUK_ETYKIET.Show End Sub [/syntax] Jeśli dodatkowo chcesz, aby arkusze ukryły się w ten sposób, aby tylko przez VBA można było je odkryć to dodaj: [syntax=vb] Private Sub Workbook_Open() Sheets("nazwa_arkusza").Visible = xlVeryHidden '.....tu wpisujesz...
To trzeba takie napisać. Opis problemu jest niewystarczający, żeby pomóc w jakikolwiek sposób - po tym opisie nie można ustalić co i skąd ma to makro kopiować i do którego skoroszytu i w jakie miejsce. W zasadzie to potrzebne jest makro, które coś gdzieś kopiuje - można sobie takie nagrać rejestratorem makr i problem rozwiązany. Ewentualnie proszę przedstawić...
[syntax=vbscript]Sub Przycisk4_Click() Dim plik As Variant Dim i As Byte Set a = ThisWorkbook.Sheets(1) Application.ScreenUpdating = False plik = Application.GetOpenFilename(filefilter:=... Excel (*.xls*),", MultiSelect:=True) For i = 1 To UBound(plik) Set b = Workbooks.Open(plik(i)) Sheets("ORZ").Range("a146").Copy nw = a.Cells(Rows.Count, "C").End(xlUp).Row...
Stąd nazwa zmienny. Jeśli nazwa jest zawsze taka sama to zamiast ThisWorkbook.Activate wpisz Workbooks("zmienny.xlsx"... Dodano po 1 bo ThisWorkbook jest skoroszyt, w ktorem makro
Witam serdecznie. Mam mały problem dotyczący zamykania okien programu Excel 2013. Potrafię otworzyć powiedzmy 5 okien Excela za pomocą pliku wsadowego, ale dwa z nich chciałbym zamknąć również za pomocą polecenia z pliku wsadowego nie zamykając całego Excela. I to jest dla mnie wyzwanie, którego nie potrafię wykonać na dzień dzisiejszy. Proszę o pomoc....
Wstaw skoroszyt
[syntax=vb]Private Sub Workbook_Open() kolejny_mies = 2 If Month(Date) >= kolejny_mies Then ThisWorkbook.Close False End If End Sub [/syntax]
Aby zmienić opcje: kliknij prawym pm w obszar osi (poza obszarem kreślenia) i wybierz "właściwości". Czy mógłbyś wstawić tu ten poprawiony skoroszyt.
Prototyp. Chcemy aby, po wpisaniu danych w dowolną komórkę pustego skoroszytu, excel sprawdził, czy w skoroszycie pierwszym To nie jest dobry pomysł, żeby za każdą zmianą w jakiejkolwiek komórce przeszukiwać arkusz z pliku z danymi. No chyba, że plik otworzymy przy otwieraniu pliku głównego.
No to tak po otwarciu tego pliku mam komunikat że pochodzi on z lokalizacji internetowej i może być niebezpieczny, po zaakceptowaniu tego komunikatu otwiera się "dobrze" natomiast po skopiowaniu tego pliku na pulpit i otwarciu otwiera się tak jak u Ciebie... Hm dziwne. Dodano po 53 Dobra włączona jest ochrona skoroszytu konkretnie jego okna trzeba to...
Sprobuj [syntax=vb]Sub zamowienie() Dim lista As Variant, ostWs As Long Dim kalk As Workbook Set kalk = ThisWorkbook 'Myslim ze tu ma byc wydruk lista = Array("I7", "I9", "L3", "I10", "K33", "J33", "L33") Application.ScreenUpdating = False Workbooks.Open Filename:=("D:\ZEST_ZAM.xlsx") With Sheets("ZEST_ZAM") ostWs = .Range("A" & .Rows.Count).End(xlUp).Row...
Jest tam w opcje Excel włączone automatyczne ponowne obliczanie skoroszytu?
Jaki kod byłby poprawny? Zamiast zamykać Excela (aplikacje :!: ) zamknij ten ukryty skoroszyt :D np.[syntax=vbscript] Workbooks("TenUkryty.xlsm").Close SaveChanges:=False[/syntax]
sprawdź . . .
Czy uruchomiłeś kod w pliku z załącznika, czy w swoim skoroszycie? Jeśli w swoim skoroszycie, to czy dodałeś arkusz o nazwie "Ostatni"? Te komunikaty wskazują, że ze skoroszytu próbuje się usunąć wszystkie arkusze. Wtedy przy usuwaniu ostatniego pojawiają się takie komunikaty.
Super pewnie ale troszke nie wiem jak z tego skorzystać jak przekopiowuje do module to nie moge odpalic dacie jakas podpowiedz W swoim 'userform' musisz wywołać funkcje 'pastepicture' i w zależności od posiadanej wersji systemu będzie to win32 lub win64. (patrz co podał ci (at)adamas_nt chociaż on ładuje obraz do 'ramki')
dane z wielu plików i wklejać je jako niesformatowane dane do jednego arkusza w oddzielnym skoroszycie... każda tabela z danymi ma inna liczbe wierszy . Zaczynają się zawsze w tym samym punkcie i liczba kolumna jest taka sama ale liczba wierszy zawsze inna. Różna jest także liczba arkuszy ale dane zawsze znajdują się w ostatnim . Wszystkie pliki z...
Jednak lepiej będzie jak załączysz skoroszyt Excela zamiast pliku PDF.
zamiast ActiveWorkbook.Worksheets("reporting 27.01") naprosto ActiveSheet p.s. ThisWorkbook to caly skoroszyt, w którym makro
ActiveWorkbook.SaveAs Filename:= folder & " " & Sheets("DANE").Range("A1").Text & ".csv", FileFormat:=xlTextWindows
Zaznacz komórki D3:D27 i z formatu komórek, w zakładce Ochrona, odznacz Zablokuj. Potem pokombinuj z opcjami menu Recenzja, Chroń arkusz - w bardziej restrykcyjnej wersji zostaw domyślnie zaznaczone dwie pierwsze opcje opcje. Szczegóły: [url=http://office.microsoft.com/pl-pl/e...
Ale mnie chodzi o Makro wstawiające do bieżącego Skoroszytu (Zeszytu) Makro we we właściwości: Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) No i w czym problem? Ja podobnie jak adamas_nt nie rozumiem problemu... plik1.xls ok plik2.xls ok plik3.xls ok
Excel ma jeszcze coś takiego jak: Chroń skoroszyt. Wpisujesz hasło i tylko właściciel po wpisaniu hasła może go edytować (nanosić zmiany). Wszyscy inni mogą go otworzyć tylko do odczytu. Hasło dla skoroszytu blokuje wszystkie arkusze. Hasło dla arkusza blokuje tylko pojedynczy arkusz w skoroszycie. Jaką wersję EXCEL używasz? Tu masz link: http://office.microsoft.com/pl-pl/excel-...
Nie znam się ale myślę, że sprawdzając od pierwszego do ostatniego arkusza całe zakresy komórek.
Zadeklarowałeś nieprawidłowy typ. Jest: 'As Workbook' powinno być: 'As Worksheet'... Nie próbowałem Twojego makra w działaniu, ale niczego więcej, co mogłoby powodować błąd, nie widać.
I to jest odpowiedź... Wystarczy wywołać ją... Oj, nie jestem pewien czy to wystarczy :!: MSDN podaje dodatkowo jako argument czas wywołania: Application.OnTime EarliestTime:=TimeValue("17:00:00") , _ Procedure:="my_Procedure", Schedule:=False http://msdn.microsoft.com/en-us/library/... Może być tak, że podanie tego...
Dopisz kolejną instrukcję warunkową...[syntax=vb] If LCase(Left(.Cells(wrs, 1), Len(ark.Name))) = LCase(ark.Name) Then If .Cells(wrs, 5) = "istniejący" Then 'gdzie info jest w kolumnie 'E' ark.Range("B2") = ark.Range("B2") + .Cells(wrs, 2) ark.Range("B3") = ark.Range("B3") + .Cells(wrs, 3) ark.Range("B4") = ark.Range("B4") + .Cells(wrs, 4) End If End...
Sprobuj to [syntax=vb] Sub zbior() Dim wb As Workbook fl = Application.GetOpenFilename("Excel ,*.xls*", , "Any files") If fl = False Then Exit Sub fl = Dir("*.xls*") With ThisWorkbook While fl <> vbNullString Set wb = Workbooks.Open(fl) shn = wb.Name wb.Sheets(1).Name = shn wb.Sheets(1).Copy after:=.Sheets(.Sheets.Count) wb.Close False fl = Dir...
Jeśli zdecydujesz się skorzystać z tabeli przestawnej np. jako skoroszytu pomocniczego wypróbuj funkcję WEŹDANETABELI
Zrób zmienną string ze ścieżką i różna ścieżkę w zależności czy otwarty plik czy nie [syntax=vb]Sub aaa() Dim lOstRw As Integer Dim test As Boolean Dim NazwaSkoroszytu As Workbook Dim sciezka As String 'Sprawdzenie jakie arkusze są otwarte For Each NazwaSkoroszytu In Application.Workbooks If NazwaSkoroszytu.Name = "BazaKlas.xlsx" Then test = True Exit...
otwiera się Arkusz 2 zaznaczając pustą komórkę kolumny B (ewentualnie dodaje nowy pusty wiersz) Patrząc na załączony plik nie mogę zrozumieć w jakim celu chcesz zrobić to makro :?: :cry: Jeśli chcesz szybko weryfikować odniesienia do arkusza 2 to najprościej proponuję makro w arkuszu 1 :spoko: : [syntax=vbscript]Private Sub Worksheet_BeforeDoubleClick(ByVal...
W kolejnych arkuszach pojawiają się dane dla dwóch pierwszych klientów. No pewnie, że tak będzie, bo tak to opisałeś. Domyślam się, że chodzi o przenoszenie do arkusza klienta, kolumny A z 'Target' i kolumnę klienta... [syntax=vb]Sub ArkuszeKlientow() Application.DisplayAlerts = False Dim Klient As String ok = Sheets("Target").Cells(1, Columns.Count).End(xlToLeft).Column...
Tak. Jest to możliwe. Chroń skoroszyt.
w zalaczniku plik scriptit, wraz ze skrotem jak cos uruchomic, wraz z 5 przykladowymi programami, milej zabawy!
[url=http://software-solutions-online.co...
po otwarciu skoroszytu...
Tak, dziękuje. Istnieje możliwość, aby dane były zmieniane jednocześnie w wszystkich arkuszach skoroszytu?
[syntax=vb] Sub nowy() Const stn = "\\server\vers\" 'sciezka do pliku na serwerze myName = ThisWorkbook.Name klon = Split(myName, ".")(0) typ = Split(myName, ".")(1) ThisWorkbook.SaveAs klon & "_old." & typ Workbooks.Open stn & myName ThisWorkbook.Close True End Sub [/syntax]
ze tak czy siak potrzebne są dwa klawisze Można z jednym np. "end" wrzuć to do modułu [syntax=vbscript]Sub test() MsgBox "ok" End Sub[/syntax] a to do thisworkbook [syntax=vbscript]Private Sub Workbook_Open() Application.OnKey "{end}", "test" End Sub[/syntax] Zapisz zamknij i uruchom skoroszyt naciśnij "end"
Najprościej byłoby z wykorzystaniem kolumn pomocniczych (załącznik) P.S. Formuły są "kopiowalne" w pionie i w poziomie, nie będzie więc problemu z kolejnymi (w przykładzie) miastami.
51, 51 klik 51, klik za ramy pola, klik 51 Tu jeszcze, ma byc 2 okna skoroszytu
Formatowanie warunkowe - formula =DZIŚ()<wygaśnięcia (zielony) komunikat - makro do zdarzenia na otwarcie skoroszytu
Plik z rozszerzeniem .xls to stara wersja skoroszytu excel w którym można było zapisać również makra. .xlsx to nowa wersja w której nie można zapisać skoroszytu z makrem. Dlatego nie zapisuje w .xlsx musisz zapisywać w pliku z obsługą makr czyli .xlsm
otwierał nowego Excela nowe wystąpienie programu Excel, lub nowy skoroszyt?
mam pytanie czy jest jakaś możliwość aby kodem excel wysłał na email jeden skoroszyt??
[syntax=vbscript]wsspr2.Range("J11,D17,A... = wsRaport.Range("B3").Value[/syntax]
Makro ma pozwolić na przeliczenie danych z np. 20-30 osobnych plików, które mają dane zawsze w zakresie A1:U100. W pliku TESTY wklejamy do zakładki DATA dane skopiowane z otwartego pliku, następnie w zakładce REPORT w komórkach AE4:AE15, mam wybrane dane po przeliczeniach, które kopiuję do kolejnej zakładki ZBIORECZE WYNIKI. Kolejne pliki są przeliczne...
Czasem pomaga zapisanie do formatu XLSX -> XLS. Zrób taki test, że: XLSX -> XLS a następnie ponownie do pliku: XLS -> XLSX XLS - to Skoroszyt programu Excel 97-2003
To jest ustawienie dotyczące tworzenia nowych skoroszytów. Dzięki, to znalazłam,szukam jednak rowziązania dla już istniejącego skoroszytu
Tu, rozumiem, chodzi o udostępnienie całej aplikacji, nie tylko pliku. Bo gdy każdy ma zainstalowany Excel, to już łatwo wspólnie pracować na jednym pliku z dysku sieciowego. https://support.microsoft.com/pl-pl/offi...
Tu problemem jest to że potrafi zamulać na tych samych Officach, a na różnych komuterach. Zastanawiam się czym to może być spowodowane w konfiguracji danego komputera. Zobacz czy pliki mają tą samą "wagę"(rozmiar), czym więcej operacji tym pliki zbierają więcej "śmieci" i się rozrastają co ma wpływ na szybkość działania skoroszytu.
będąc w jednym skoroszycie nie mogę zrobić odniesienia do innego skoroszytu(np żeby dodać jakaś wartość z arkusza, który jest w innym skoroszycie). Nie mogę nawet jednego arkusza z danego skoroszytu skopiować do innego skoroszytu. Excel będąc w jednym z nich jak gdyby nie widzi drugiego. Jak jestem w skoroszycie A i w arkuszu nr 1 w komórce a1 chcę...
Z tego wynika, że jeden arkusz drukowany tylko na jedną stronę, ponieważ tylko jedna komórka w arkuszu jest M6. Innymi słowy przycisk drukuje cały skoroszyt?
Witam. Mam otwarty 1 skoroszyt w EXCELU. Klikając w górny "x" zamykałem skoroszyt i cały Excel (do niedawna). Teraz zamyka się tylko skoroszyt, a EXCEL pozostaje otwarty. DLACZEGO?
Hej Jeśli masz zabezpieczony hasłem (strukturę) na początku makra daj ActiveWorkbook.Unprotect Password:="twoje hasło" twój kod ActiveWorkbook.Protect Password:="twoje hasło"
Tak na szybko co do łączy. Przy tworzeniu arkusza zapomniałem poprawić jeszcze parę formuł dlatego wyskakuje prośba o łącze do poprzedniego skoroszytu. W arkuszu Marzec w komórce AJ5 wpisz =AH5+Styczeń!AH5+Luty!AH5 i skopiuj w dół do końca w AK383 wpisz =Luty!AK383 a w AO384 wpisz =SUMA(Styczeń!AK384;Luty!AK384;AK384... i to załatwi sprawę pytania...
Przetestuj poniższe makro [syntax=vb]Sub kopiuj() Dim shInv As Worksheet Dim shInpt As Worksheet Dim lOstRwDst As Long Dim lOstrwSrc As Long Application.ScreenUpdating = False Set shInv = ActiveWorkbook.Sheets("Inventory") Set shInpt = ActiveWorkbook.Sheets("Input") lOstRwDst = shInv.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row lOstrwSrc = shInpt.Cells(Rows.Count,...
Mam kilka otwartych plików Excela (skoroszytów), np. test1.xlsm p1.xls p2.xls p3.xls Będąc w pliku test1 chciałbym aktywować skoroszyt p1 (arkusz1), następnie skopiować z niego dane, wkleić je do pliku test1 (arkusz2), zamknąć plik p1 i przejść do następnego pliku. próbowałem dostać się do drugiego pliku z poniższego kodu, niestety pojawia się błąd...
Witaj [syntax=vb]Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)[/syntax] w kodzie skoroszytu.
Prawdopodobnie zapisujesz pliki w starszym formacie, który nie jest do końca kompatybilny z Excel 2007 (w nagłówku masz napisane "Tryb zgodności"). Spróbuj wszystko sobie sformatować tak jak powinno być, a następnie zapisać arkusz we współczesnym formacie excela (z rozszerzeniem xlsx lub xlsm - jesli plik z makrami): "Zapisz jako" > "Skoroszyt programu...
witam. próbuje skomplikować skoroszyt excel w którym będzie można wpisywać dane za pomocą jednego arkusza do wielu innych po koleii. dane składające się z 6-8 kolumn w wierszu. Jak to ugryźć?
Przepraszam że się wtrącę, ale po co ci zmienna "nw" i co ona właściwie powinna obliczać/wykazywać? nw = b.Cells(3, 10).End(xlUp).Row + 1 Ma znaleźć ostatni z trzech pierwszych wierszy 10 kolumny i dodać 1? A błąd polega (wg mnie) na tym że do zmiennej b przyporządkowałaś skoroszyt. a powinien być arkusz otwartego skoroszytu
Witam! Mam problem, wydaje być się prostym, ale nigdzie nie mogę znaleźć rozwiązania. Mam folder z plikami (skoroszytami) Excel - około 80 plików (czasami w każdym skoroszycie po parę arkuszy). Chciałbym scalić te wszystkie pliki w jeden skoroszyt, aby powstał jeden plik z 80-cioma arkuszami. Przykład: Mam folder X który zawiera: Skoroszyt A w który...
Czyli makro ma nie tworzyć nowego skoroszytu? :>
Dziekuje Panom za wypowiedzi - byc może w przyszłości to rozwiazanie znajdzie zastosowanie - jednakże wobec braku globalnego rozwiązania i tego że sama zmiana powiększenia zajmuje 3-4s po otwarciu pliku, 10s to zdecydowanie za długo. Zamykam.
Maciej Gonet o to chodziło jednak po przekopiowaniu do mojego skoroszytu przestaje działać
Witam. Chciałbym wywołać okno zapisz jako np. ZapiszJako = Application.GetSaveAsFilename(fileFilter... Excel (*.xls), *.xls") ... ale po zapisaniu, pliku nadzwyczajnej nie ma. Dodatkowo, chciałbym aby okno przyjmowało konkretną ścieżkę z serwera. Po kilkunastu ładnych próbach poddaje się, nie wiem gdzie tkwi problem. Proszę o pomoc.
Tylko, żeby zadziałała funkcja ADR.POŚR plik źródłowy musi być otwarty. Jeśli tych plików źródłowych jest dużo, a z każdego ma być pobrana jedna wartość, to raczej nie będą otwarte. Trzeba wtedy użyć VBA. Sposobów jest kilka, wybór zależy od tego ile danych i w jakiej konfiguracji mają być pobrane oraz jak często trzeba odświeżać wyniki. W sieci jest...
Dobry wieczór, Najwygodniej zdefiniować dane do wykresu za pomocą formuł nazwanych. W załączniku przykład jak to zrobić. Proszę zwrócić uwagę, że przy definiowaniu zakresów na wykresie trzeba używać nazw kwalifikowanych, tzn. poprzedzonych nazwą skoroszytu, ewentualnie arkusza i wykrzyknikiem. Pozdrawiam
Jak otworzysz ten skoroszyt to otwiera ci się tylko ten excel na szaro, czy w drugim okienku jest poprawnie otwarty skoroszyt? Masz w exploratorze plików włączony podgląd zawartości (okienko podglądu)?
Filename:=MyPath & "\" & sht.Name & Range("D1").Text & ".xlsx"
Np =JEŻELI(MOD(LICZBA.CAŁK(LOS&... Z tym, że funkcja LOS() będzie przeliczana przy każdej zmianie arkusza. Przełącz w opcjach "Obliczanie skoroszytu" na "ręcznie" i używaj [F9]
na podobnej zasadzie działa również funkcja pull która też wyszukuje w zamkniętych skoroszytach pozdr
Następnie przechodzę do drugiego arkusza (nie skoroszytu)
z kilku innych arkuszy Z arkuszy, czy ze skoroszytów? Jeśli z arkuszy (w tym samym skoroszycie) to wstawiasz nazwę arkusza, wykrzyknik i odnosisz się do jego zakresu/komórki. Np. w ten sposób odwołasz się np. do A1: [syntax=vb]=Arkusz1!A1[/syntax] Jeśli ze skoroszytów, to tutaj wyjaśnienie: http://office.microsoft.com/pl-pl/excel-...
Za pomocą narzędzia Pobieranie i przekształcanie zaciągam do jednego skoroszytu Excel dane z wielu mniejszych skoroszytów. Tych małych skoroszytów przybywa codziennie kilkadziesiąt, a jeden zbiorczy ma służyć jako archiwum danych. Wszystko działa, zaciąga się poprawnie, natomiast mam obawy, że im więcej plików źródłowych, tym dłużej pobieranie danych...
Dziękuję za odpowiedzi ale uszczegóławiam pytanie. Stworzyłem skoroszyt, w którym niektóre dane muszą być niewidoczne dla osób z niego korzystających. Wszystkie zastosowane przeze mnie ograniczenia i blokady nie wykluczają sytuacji, w której znając nazwę ukrytego arkusza mogę odczytać z niego komórkę po komórce z poziomu innego arkusza, albo z poziomu...
Jak się tego pozbyć? Zaznaczyć zbędne wiersze i usunąć. Reasumując nie działa usuń wiersz Sprecyzuj - jak to nie działa? Usuń wszystko - nie tylko dane, ale i formuły! P.S. Jaka wersja Excel'a? PS.II W ostateczności skopiuj to, co cię interesuje do nowego skoroszytu.
To dodaj do tego makro, które jest uruchamiane za pomocą klawisza F8 na klawiaturze ze złączem USB, która nie jest podłączona do tego komputera. Już żadne pytanie na Elektrodzie mnie nie zadziwi. A mnie już nie zdziwi żadna odpowiedź pseudo "pomagiera"... BTW z propozycji Kolegi JRV sam chętnie skorzystam bo nawet nie wiedziałem, że jest taka możliwość...
Sprawdź pod tym linkiem: https://support.office.com/pl-pl/article...
No właśnie problem polega na tym, że przekopiować nie można bo się obleje :/ A jak przywołać funkcje z poziomu skoroszytu predkosc.xlsx ?
Ktoś kiedyś na tym forum polecał tą stronę: [url=http://www.e-kanban.pl/index.php?op... Spróbuj zastosować to rozwiązanie, wymaga jedynie drobnej przeróbki aby importować dane do jednego arkusza...
Powiem ze swojego doświadczenia że: Niestety excerl tak ma. Jeżeli już wpisałeś coś w wiersze poniźej to wykasowanie ich czy poprzez del czy poprzez usunięcie wierszy (kolumn) nic nie zmieni jeżeli chodzi o objętość. Choć dla mnie 8 kb a 14 kb to żadna różnica. Kłopot gdy z ok 140 kb rozrasta się do 1.5 Gb. Jedynym wyjściem jest skopiowanie odpowiednich...
Przepraszam jak mieszam, ale może zobacz tutaj: http://vbatools.pl/podziel-dane-na-arkus...
Cześć, proszę o pomoc, skorzystałem z kodu znalezionego na forum, jednak potrzebuję pewnej modyfikacji. W obecnej postaci makro sprawdza czy istnieje w lokalizacji skoroszyt o określonej nazwie, jeżeli tak to go usuwa i tworzy nowy. Docelowo chciałbym żeby makro w przypadku kiedy istnieje już plik tworzyło w nim nowy kolejny arkusz, a jeżeli nie istnieje...
W moim przypadku "Wrzesień.xls". A ja bym chciał, by Page kopiowane było z równolegle otwartego excela o dowolnej nazwie Możesz odwołać się do numeru skoroszytu. Excel Analityczny oraz druga kopia z Nowym miesiącem do analizy. Czyli jak otworzysz pierwszy Analityczny a drugi "kopia z Nowym miesiącem do analizy." to wtedy zamiast "Windows("Wrzesień.xls").Activate"...
W Excelu prawie wszystko jest możliwe :) Najprościej użyć WYSZUKAJ.PIONOWO(). Załączam proste rozwiązanie, dodałem wybór z listy towaru w rozliczeniu i zmianę miesięcy rozliczenia. Na przyszłość załączaj pliki excela jak wzór, nie trzeba ich tworzyć od nowa. Nie wiem tylko czemu masz to w dwóch skoroszytach, w jednym byłoby prościej.
Można, w Chroń Skoroszyt wybierz Chroń strukturę i okna .
Witam, Bardziej zależy mi na ściąganiu danych z grafika na karty pracy itp. Tak aby grafikiem dało się " kontrolować" karty pracy itp. Automatycznie uzupełniało godziny nocne - praca w jakich godzinach urlopy wolne itp...
ścieżkę aktualnie otwartego skoroszytu zczytujesz tak: [syntax=vb]ActiveWorkbook.path[/syntax] Myślę, że dalej już dasz radę;) Jakby nie to pisz.
excel skoroszyt skoroszyt excel szablony skoroszyt formatowanie
ploter wycinania antena symetryzator wykonać generator sygnału radiowego
polecane wiertarko wkrętarki wiertarko wkrętarka
Trudne odpalanie Suzuki - możliwe zapowietrzenie Sterownik Defro - Jak sprawdzić przedmuch?