Witam! Możesz wykorzystać kod: :spoko: [syntax=vbscript]Public Sub zapisz() Dim Wb_Name As Variant Wb_Name = Application.GetSaveAsFilename If Wb_Name <> False Then ActiveWorkbook.SaveAs Filename:=Wb_Name End If End Sub [/syntax]
Twórcy Excela mają obsesję zamieniania wszystkiego, co może przypominać datę, na tę datę właśnie. I niestety nie znam sposobu jak to wyłączyć. Kluczem jest tu format daty ustawiony w systemie operacyjnym w ustawieniach regionalnych, bo z niego Excel odczytuje domyślny format daty. W Windows 10 PL przyjęto jako domyślny, format daty z kropkami dd.mm.rrrr...
W sposobie formatowania nic nie zmieniałem. Dodałem funkcję UDF Daty, która zamienia zapis w kolumnie H na tablicę dat, która jest potem używana do definicji reguł formatowania warunkowego. Akceptowalne zapisy w kolumnie H: Pojedyncza data w formacie: d.m.rrrr (z dwiema kropkami) Ciągły przedział dni zapisany z kreską: d-d.m.rrrr (jeden łącznik, dwie...
Przyznam, że u mnie w domu jest to samo co u ciebie. W pracy zapisywało mi bez przycisku a jedyna różnica to taka że w pracy mam W7 co nie powinno mieć wpływu. Edit: A może w pracy już dodałem tą linijkę kodu i dlatego mi działąło. Poniżej kod kolegi adamasa z linijką usuwającą przycisk. [syntax=vb]Sub Zapis() sc = "C:\" 'wpisz path jako string, koniecznie...
[syntax=vbscript]Workbooks.Open ("C:\Users\Fransf\Desktop\TESTY\Klienci\... & nazwaklienta & ".xlsx")[/syntax]
[syntax=vbscript] Private Declare Function GetTempPath Lib "kernel32" Alias "GetTempPathA" _ (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long Private Const MAX_PATH As Long = 260 '~~> Change this where and how you want to save the file Const FlName = "C:\MyWorkbook.txt" Sub Sample() Dim tmpFile As String Dim MyData As String, strData()...
Eksperymenty związane z EKG Od dawna uważałem za interesujące rozważania o własnych systemach EKG. Szczególnie interesują mnie rozwiązania niedrogie i łatwe w konfiguracji. W tym artykule przedstawiono kilka sposobów wykorzystania tej techniki. Ale najpierw coś podstawowego: Ze względu na bezpośredni kontakt elektrod EKG z ciałem, wszystkie elementy...
Jakie operacje wykonujesz w Excelu na tych danych? Pokaż jak faktycznie wyglądają te Twoje dane. Najlepiej w formie załącznika. To co napisałeś w poście jest niespójne. Raz masz kropki dziesiętne, innym razem przecinki. A to właśnie jest przyczyną kłopotów. Ważne jest też jakich ustawień systemowych używasz w swoim komputerze. Jaka wersja językowa,...
Podmień na [syntax=vbscript]NowaNazwa = ThisWorkbook.ActiveSheet.Range("A1").Val... & ".xlsm"[/syntax]
To sobie zmień zapisy typu [syntax=text]"Firma"&{1;2;3}[/syntax]na stałe tablicowe z faktycznymi nazwami arkuszy: [syntax=text]{"Adidas";"Nike";...}[/synt... A wersję Excela należy zawsze podawać. Gdybyś podał od razu, zrobiłbym to trochę inaczej, a teraz już nie mam czasu przerabiać. Jeszcze inny pomysł na rozwiązanie. Najpierw znalezienie arkusza,...
Cześć, Proszę o pomoc ponieważ nie potrafię sobie z tym poradzić, a nie jestem biegły w temacie makr. Otóż pilnie potrzebuję skonstruować plik, który pełniłby rolę programu do generowania prostych faktur. Plik zrobiony według rzeczywistych potrzeb, miał zostać jedynie zautomatyzowany tak, by po kliknięciu w przycisk "Generuj wydruki" odbywał się zapis...
Witam, Poszukuję rozwiązania w VBA dotyczącego możliwości wyciągnięcia z komórki A1 (w której znajdują się zapisy tekstowe przeplatane z cyframi np. "jakiś tekst 22-122 dalej jakiś tekst3223333 2333 222 tekst" itd do komórki A2. Ciągi cyfr w komórce A1 zapisane są różnie jak w podanym przykładzie. Chciałbym mieć możliwość wyciągnięcia takiego ciągu...
Prowadzę od lat arkusz, w którym co miesiąc dokonywane są inne wpisy, praktycznie wszystkie wartości w komórkach pieniężnych. Czy Excel posiadam taką możliwość, jakieś zapisy w historii, abym mógł zobaczyć jak wyglądał ten arkusz w poprzednim miesiącu, dwa miesiące temu i trzy? Kto pyta nie błądzi, a jako montażysta video w słusznym wieku, programy...
Witam, czy mogę prosić o dalsze wsparcie i pomoc? Niestety mimo usilnych prób nie potrafię napisać tej formuły która obsłuży 24h godziny tryb pracy i zliczy stanowiska w każdej godzinie przy założeniu że beda tylko zapisy godzinowe np 20-03, 14-20 itd
Przykładowo taki zapis: [syntax=vbscript]Workbooks("zlecenia.xls... 2), Cells(100, 2))[/syntax]jest nieprawidłowy. Powinno być: [syntax=vbscript]Workbooks("zlecenia.xls... jak koniecznie chcesz używać obiektu Cells, to np. tak: [syntax=vbscript]Set wks...
HeHeHe :) Prot, Maciej, Bardzo dziękuję Wam za pomoc. O to mi właśnie chodziło, działa wyśmienicie. Owszem, istnieje ryzyko, że operator zostanie dłużej na stanowisku pracy i wówczas jego przerwa (na tym stanowisku) trwa np. 20min., a kolejne 10 min trwa już w zapisach (raporcie) innego stanowiska, ehhh Póki co zwracam im uwagę, żeby zapisy czasu pracy...
[syntax=vbscript]Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Column = 1 Then w = Target.Row ok = Cells(w, Columns.Count).End(xlToLeft).Column nw = Cells(Rows.Count, "A").End(xlUp).Row + 1 Range(Cells(w, 1), Cells(w, ok)).Copy Destination:=Range("A" & nw) Cancel = True End If End Sub [/syntax]
Jaka wersje Excel ? Jaky komunikat?
ssd now snv125-s2/64gb. Powiem Ci, że obserwowałem zużycie procesora w trakcie testu i skakało ono na poziomie 5-15% czyli średnio 10% dzięki antywirusowi, explorerowi itd, jak to możliwe że dysk zabiera prawie 20% kiedy zużycie wynosi 10% dla wielu programów działających w tle? Sprawdzę ten program, wyłączyłem dla testu superfetch i prefetch, nic się...
arkusz i zapisał go w tym samym skoroszycie ale pod nazwa wzięta z komórki. Następnie zapisał by plik w określonym miejscu z nazwa rownież z określonej komórki. Napisz do wyjaśnienia adresów tych komórek. Ponadto sciezku dla zapisu Dodano po 1 [syntax=vb] Sub Kolejny_dzen() Sciezka = "D:\tmp\" '- to dopasuj do swoich potreb plik = Sciezka & Format(Int((Date...
Może tak? Private Sub CommandButton14_Click() Dim newFile As String, fname As String fname = "nowy plik" newFile = fname sFName = Application.GetSaveAsFilename If sFName <> False Then ActiveWorkbook.SaveAs Filename:=fname End If End Sub
Witam, otóż mam plik *.xlsm zawierający około 10 arkuszy w których są formuły i makra. Po zakończeniu edycji tego pliku chcę go przekazać dalej, ale taki plik otwiera się bardzo długo i zajmuje dużo miejsca, a dodatkowo każde przeliczenie zajmuje kilka minut... Czy jest jakiś sposób aby zapisać same wartości bez formuł i makr? Pozdrawiam i z góry dzięki...
Cześć Taka absurdalna sytuacja: wczoraj edytowałem plik Excel, zapisałem, wszystko OK. Dzisiaj plik nie otwiera się (komunikat o błędnym haśle, sprawdzeniu CapsLocka itd.) - mimo że hasło na 200% prawidłowe. Mam backup tego pliku sprzed kilku dni i ten backup się normalnie otwiera, aktualny plik - nie. Próbowałem na dwóch wersjach Excela - 2003 (na...
Witam. Mam podobny problem. Chciałby skrócić zapis kliku funkcji "Jeżeli" o ile takie coś jest wykonywalne w excelu. W załączniku plik. Z moim problemem. Te wszystkie formułki z arkusza2 z komórek od Q1 do X1 muszę skopiować 150 razy w dół. dodatkowym problemem jest to że w każdym nowym wersie przy zapisie F1<5, F<10 itd. Wartość F1<X będzie...
w 3 zestawie na początku należy zainstalować sterownik z pulpitu a potem zmienić udostępnianie czy na odwrót ? Kosztorys w open office wygląda tak samo jak w excel ? tzn chodzi mi o to że są takie same zapisy tj. =SUMA(B1:B8) - liczy sumę od b1 do b8. Z góry dzięki !!
Witam Jestem na etapie tworzenia pliku do utrzymania finansów firmy w porządku. wyglada to następójąco: -6 Arkuszy: Operacje,wydatki,Inwestycja,Sprzedaż,Wyp... na arkuszu operacje są stworzone guziki (makra) przenoszące do konkretnego arkusza który jest przypisany do danego guzika. Arkusze jak np:wydatki zawierają pola do wypełnienia takie...
Jeśli masz tych wzorców kilka (np. 4), nie ma potrze by stosowania makr, wystarczy kilka funkcji (logicznych i tekstowych), w następnym kroku (np. na następnym arkuszu) wyniki możesz zebrać tak, aby nie było między nimi pustych wierszy - takie zapisy pojawiały się już na Elektrodzie - z tego, co pamiętam ostatni ok. 2 miesięcy temu.
Witam serdecznie W excelu zrobiłem sobie formularz umowy, połączony z bazą osobową, rachunkami i oświadczeniami. Wisienką na torcie byłoby, gdyby jeszcze w osobnym arkuszu prowadził sie rejestr tych umów. Zrobiłem w VBA prostą formułę, żeby mi archiwizowało z poszczególnych komórek formularza dane, ale niestety jest to w jednym wierszu i zaciąlem się...
Witam, stworzyłem arkusz do gry cashflow, wszystko ładnie działa, ale chciałbym wprowadzić jeszcze jedną funkcję, niestety nie wiem jak. Chodzi dokładnie o to, że jak wprowadzam z listy rozwijalnej nieruchomość, to pojawia mi się jej nazwa we wszystkich potrzebnych miejscach, wystarczy, że wpiszę cenę zakupu, wkład własny itp. i wszystko jest ok. Natomiast...
Są dwa magazyny - A i B. Wyciągam przedmiot z magazynu A, skanuję jego kod kreskowy, i umieszczam w magazynie B. Jak to zrobić, aby w momencie skanowania automatycznie zapisywała się w tabeli data i godzina skanowania? Makro? Chodzi o jakąś automatyczną procedurkę, ponieważ jest dużo przedmiotów, ręczne dopisywanie odpada.
Dzien Dobry Zderzylem sie z problemem dynamiczengo przekierowania na pliki wsadowe i nie mam pojecia jak przeskoczyc. Cel: Mam kilka sklepow do obslugi, ktore generuja listy obrotu i planow obrotu. Chce zrobic formatke, ktora umozliwi mi wczytywanie tylko interesujacych mnie kolumn z ich sprawozdan i dodanie do tego kolumny z planem na nastepny rok...
Witam serdecznie. Mam kłopot z napisaniem makra VBA, które ma "zmusić" użytkownika do zapisania zmian w arkuszu tylko przez opcję "zapisz jako" (opcja "zapisz" musi być wyłączona). Chodzi o to, aby skoroszyt źródłowy nie został przypadkiem nadpisany - co mogłoby zepsuć jego funkcjonalność. Chodzi o to, żeby użytkownik otrzymał komunikat, że nie można...
Jakby co, to do tego makr nie potrzeba - wystarczą nazwy zdefiniowane z przypisaną odpowiednio wartością. Tylko że potem trzeba stosować zapisy "ściśle matematyczne". Załóżmy, że utworzę nazwę "czarny", której przypiszę wartość "2" - w danej komórce trzeba będzie wtedy wpisać "formułę": "=2 * czarny" , aby otrzymać wynik "4". Podobnie z kombinacjami...
Wybacz kolego nie rozumiem na podstawie Twojego przykładu co chcesz osiągnąć (te "codzienne" zapisy w arkuszu Y są max 9 razy w roku ? nie wszystkie zamówienia podlegają agregacji w arkuszu X ?) :?: Mam wrażenie jednak, że w takich sytuacjach gdy masz w jednym arkuszu masowe dane (codzienne), a w drugim agregowane ale z tymi samymi nagłówkami - warto...
Witam np tak [syntax=vbscript] Range("B1") = Me.ComboBox1.Value If OptionButton1.Value = True Then Range("B2").Value = "tak" [/syntax]
Witam podczas zapisywania pliku exela exel przywiesil sie poczym sie wylaczyl jak gdyby nic ale po ponowynym otworzeniu wyskoczyl blad ze plik jest uszkodzony :( w folderze TEMP (w ustawiniach lokalnych) znalazlem poprzednie zapisy tego pliku ale maja one rozszezenie .tmp po zmianie rozszezenia na .xls exel wyzuca blad "nieznany format pliku" jak to...
Witam. Szukałem w necie ciekawego rozwiązania który by mi pomógł w rozwiązaniu takiej zagadki. Chciałem zrobić coś co przypominało by: - Zapisy do grafiku on-line w sieci lokalnej, dostępne jednocześnie dla kilku użytkowników. - Użytkownicy muszą mieć możliwość dostępu do "pliku, formularza czy cokolwiek tam powstanie" on-line, niezależnie od tego czy...
skaner symbol LS2280-SR20007R-UR, nie mam do niego żadnej płytki :/ chodzi mi o ustawienie w exelu tak aby w kolumnie np w kolumnie A dawał zapis kodu i ilosci w kolumnie B dawał zapis z drugiej etykiety porównawczej w kolumnie c dam funkcję aby sprawdzał prawda/fałsz chciałem aby z automatu po przeskanowaniu 2 pierwszych kodów w A, wskakiwał w kolumnę...
Wygląda, że jest ok. Czy mogę jeszcze dostać instrukcję krok po kroku które zapisy za co odpowiadają? :) Ciężko mi się trochę połapać a muszę ją zmodyfikować do wskazywania odpowiednich danych :) A i jeszcze jedno. Procenty muszą być wszystkie ustawione rosnąco? Nie mogą być tylko w danej grupie? bo szczerze mówiąc stanowi to spory problem :) edit.2...
Nagraj sobie makro zapisywania. Poniżej zarejestrowane (bez korekty) dwa: "Zapisz jako" oraz Ctrl+s (zwykłe zapisz) http://obrazki.elektroda.pl/3841968300_1... i wybierasz z listy. Aby oprogramować komórkę/zakres potrzebujesz procedury zdarzeniowej [url=http://dzono4.w.interiowo.pl/kurs/d... Tu należy warunkowo wywołać...
Witam serdecznie. Dziękuję Ci adamas_nt za szybką reakcję. Twoja podpowiedź dużo mi pomogła, ale nie do końca rozwiązuje mój problem. Chodziło mi bardziej o: KONTA KOSZTÓW mogą w ciągu dnia rozbijać się nawet do kilkunastu pozycji np. 01.01.2011 r. może być 12 wierszy x(1So...) na KP czyli mamy 12 miejsc powstawania kosztów i tak przez 31 dni stycznia...
marek003 , dzięki za zainteresowanie się tematem. Co do godziny to nie ma co z nią robić kolumna wiersz i auto jest po prostu kopią. Formatowanie zostaje ogólne samą wartość tam zapisaną traktujemy bardziej jako tekst niz wartość czasową. To nie jest na dobrą sprawe potem w żaden sposób wykorzystywane. Po prostu determinanta tego o której godzinie...
Narzędzia -> Opcje -> [Zapisywanie] -|/|Zapisz informacje niezbędne do odcztania pliku co |_| min Pozdrawiam Lt.
Wystarczy znać dokładny czas rozpoczęcia i zakończenia pomiarów oraz ich ilość. Nawet jeżeli odstęp między pomiarami nie będzie wynosił dokładnie 1 minuty, to mając powyższe dane możemy go wyznaczyć bardzo dokładnie. Wyniki i tak będzie pewnie obrabiał komputer, bo nie wyobrażam sobie robienia tego "na piechotę", więc problemu też nie ma, komputerowi...
[url=https://docs.microsoft.com/en-us/of...
ma byc xlTextPrinter(=36) lub xlPrinter(=2, jak w makro)? Dodano po 4 With ActiveWorkbook .Unprotect Workbook to nie jest arkusz, tylko skoroszyt Dodano po 5 P.S. xlPrinter zapisze plik .SLK, nie .PRN
co zrobić, żeby do nazwy pliku dodać datę? Zmień Rozumiem, ze za tym fragmentem kodu "Next ws" muszę powtórzyć zapis dla kolejnych arkuszy (ze zmianą nazwy oczywiście;) Nie. Makro działa tak, jak chciałeś w pierwszym poście - zapisuje do PDFa wszystkie arkusze oprócz jednego, który wykluczasz w porównaniu ws.Name <> ...
Nie da rady w Excelu, ten program to nie temporalna baza danych tylko prosty program kalkulacyjny
Zrobiłem tak, jak to zwykle robią zawodowcy ;) 1. Nagrałem sobie makro przy zapisywaniu. Wyszło takie coś: [syntax=vbscript]Sub Makro1() ' ' Makro1 Makro ' ' ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Users\Adam\Desktop\Zeszyt1.pdf", Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=...
To wina Office, zobacz trzeci post w tym watku: http://answers.microsoft.com/en-us/offic... Office podczas zapisywania tworzy nowy plik zamiast modyfikowac otwarty.
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...
[syntax=vb]Sub CoMinute() y = 1 Sheets("Pomiary").Select ostw = Cells(Rows.Count, "A").End(xlUp).Row For x = 1 To ostw Step 60 Sheets("Wykres").Cells(y, 1) = Cells(x, 2) 'napięcie Sheets("Wykres").Cells(y,2) = Cells(x,3) 'natężenie y = y + 1 Next x End Sub[/syntax] Arkusz z pomiarami nazwij 'Pomiary", a arkusz, gdzie pojawią się dane do wykresu, nazwij...
Pierwsza zmiana wpisuje noc (zapisz), druga zmiana wpisuje rano (zapisz)... A co się dzieje z wartością komórki "noc" po pierwszym zapisie :?: a co przy drugim zapisie ? :D W mojej ocenie makro zapisujące powinno na końcu czyścić wpisy poprzedniej zmiany np zapisu czasu przez poszczególne zmiany można wykorzystać Twój pierwotny kod w postaci: [syntax=vbscript]Sub...
Ja w takich sytuacjach robię bazę danych w Accessie, plik .mdb umieszczam na sieci, a użytkownicy korzystają z arkuszy Excela do pobierania / modyfikowania / zapisywania danych za pomocą zapytań SQL w makrach. Sprawdza się przy kilku użytkownikach, choć nie testowałem tego rozwiązania jeżeli dwie osoby będą chciały naprawdę jednocześnie zmodyfikować...
Do tego nie jest Ci potrzebna żadna pętla. Najpierw musisz sobie określić pierwszy wolny wiersz w arkuszu Inkrementacja jest zbędna przecież (kod pod przyciskiem)... 1. Wywal pętlę. 2. W miejsce a=a+1 wpisz powyższą linię i ciesz się działaniem.
[syntax=vbscript]Sub PDFy() s = "C:\PlikiPDF\" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=s & "Excel.pdf" Set Wrd = CreateObject("Word.Application") a = s & "Excel.pdf " For x = 1 To 2 Set Doc = Wrd.Documents.Open(s & x & ".docx") p = s & "Doc" & x & ".pdf" Doc.SaveAs p, 17 a = a & " " & p Doc.Close Next Wrd.Quit q = Shell(s & "pdftk.exe...
Chyba wszyscy krótkofalowcy znają (powinni znać). Widzę, że Google Ci się zepsuły, więc jak już je naprawisz, to wpisz wyrażenie log stacji radiowej lub dziennik stacji amatorskiej i będziesz miał wszystko, o co pytasz. W poniższym linku masz przegląd programów wraz z opisami: https://hf5l.pl/abc-log/ ...program do zapisu łączności, ale tylko i wyłącznie...
zapisy gwintu kopiować excel excel kopiowanie excel excel
źródło połączyć równoległy metoda przekształcenia moduł klimatyzacji
junkerts euroline at9100 przestrojenie
Jura J5: Komunikat "Dosyp ziaren" - młynek kręci, ale nie robi kawy Rieju MRT 50 – lokalizacja przerywacza kierunkowskazów za reflektorem, dostęp serwisowy
