W takim razie spakuj i wystaw tutaj.
Mogę jeszcze poprosić o pomoc A co mam zrobić :)
Plik CSV nie ma formatowania. To plik tekstowy. Dopiero otwarcie go w Excelu powoduje, że Excel domyślnie kojarzy dane z ich przypuszczalnym formatem.
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...
Utwórz kopię, ale zapisz wartość
Sprawdź, czy plik nie jest zamarkowany [tylko do odczytu] w jego właściwościach.
Zapisz plik jako E2007 (pierwsza pozycja w menu "Zapisz jako"), zamknij i otwórz ponownie.
Witam Kliknij z menu PLIK opcje ZAPISZ JAKO, następnie po prawej na górze okienka menu NARZĘDZIA i OPCJE OGÓLNE.
Zapisz daty w takiej postaci: A1: 1997-4-5 A2: 2008-12-22 Domyślnie Excel powinien sformatować te komórki jako 'data', jeżeli tak się nie stanie to we właściwościach komórki zmień na 'data'. W komórce A3 wpisz =A2-A1 i gotowe.
ok zrobiłem ci szablon z makrem wklej swoje dane i naciśnij zapisz stworzy ci plik .csv który wg opisu wczytasz do Outlooka
Ty no, czytam raz i drugi i nie rozumiem :D co chcesz osiągnąć? Tzn. co jest celem tej operacji? Chcesz zamienić coś na co? Czemu nie działa ZAPISZ JAKO? :idea:
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"
A skąd kolego masz ten pik z makrami "Skoroszyt.xlsm" ? Odpowiedz na pytanie Excela - czy masz go z zaufanego źródła ? :?: Zaufane źródła - z reguły nie ukrywają żadnych makr ani arkuszy typu "sheet8.xml" :D Otwórz sobie jakiś nowy skoroszyt, wprowadź jakieś dane i zapisz go raz jako zwykły skoroszyt(1) xlsx, a potem zapisz ten sam skoroszyt(2) jako...
Były jakieś dokumentacje, microsoft w końcu zmiękł, być może nawet na swoich stronach opublikował. Ja w swoich programach do generowania dużej ilości danych do excela wykorzystywałem dwa mechanizmy 1. pliku csv, excel ładnie je łąduje 2. mechaznim ADO, można odpalić "wirtualnego" excela i jemu wydawać polecenia typu zapisz komórkę, ustaw styl itp. Niestety...
Czy dokument drukujesz z przeskalowaniem (<>100%)? Jakość wydruku "max"? Spróbuj jeszcze inaczej - wydrukuj dokument do PDF-a (np za pośrednictwem PDF Creator, albo Zapisz jako -> PDF) i potem dopiero na drukarce. Jaki efekt?
Dopasuj sobie takie makro: [syntax=vbscript]Sub Przelicz() Dim cel As Range With Worksheets("Generator cen") For Each cel In Worksheets("310").Range("A2:A180") .Range("B3") = cel.Value cel.Offset(, 3) = .Range("B26").Value Next cel End With End Sub[/syntax] Po otwarciu załącznika zapisz go sobie w formacie .xlsm. Ja użyłem starego formatu .xls ze względu...
"clubs" przy: If zapisz <> False Then wywala się..
To całe makro?? Ten fragment służy jedynie do wybrania nazwy pliku. Zapis nastąpi w momencie wywołania: [syntax=vb]ThisWorkbook.SaveAs (ZapiszJako)[/syntax]
Wejdź w Windows Update i zainstaluj wszystkie ważne aktualizacje. Sprawdź błędy urządzeń w Menadżer Urządzeń. Zaktualizuj sterowniki, wstaw screena z Menadżera Urządzeń. Wejdź w "mój komputer" i wykonaj oczyszczanie dysku: https://www.komputronik.pl/informacje/ja... W oknie z kroku 1 można też kliknąć „Oczyść pliki...
Ta wersja powiększa czcionkę w aktywnym arkuszu czyli Czyli powiększ - zapisz - powróć do poprzedniej. [syntax=vbscript]Sub PDFy() Application.ScreenUpdating = False Dim DatExample As Date Worksheets("baza zamówień").Range("C2").Value = Worksheets("baza zamówień").Range("R2").Value DatExample = Date s = "C:\PlikiPDF\DPFy\" With ActiveSheet .PageSetup.CenterHeader...
Najszybciej zrobisz to bez excela ;) 1. Zainstaluj sobie Notepad++ (Freeware) 2. Skopiuj do niego zawartość arkusza. Lub zapisz arkusz jako csv i otwórz w Notepad++ 3. W Notepad++ zamień znak tabulatora "\t" (jesli kopiowałeś) lub średnik ze spacją "; " (jeśli zapisywałeś csv) na znak nowej linii ("\n"). Musisz użyć wyszukiwania rozszerzonego 4. Wynik...
Zamiast [syntax=vb] .Sheets(4).Range("a3:a3").Copy ThisWorkbook.Sheets("Arkusz2").Range("c" & n2 + licznik & ":c" & n2 + licznik)[/syntax] zapisz [syntax=vb] .Sheets(4).Range("a3:a3").Copy ThisWorkbook.Sheets("Arkusz2").Range("c" & n2 + licznik & ":c" & n2 + licznik).PasteSpecial xlValues Application.CutCopyMode = False [/syntax] itd.
Najprościej jak się da: Plik -> zapisz jako -> tekst (rozdzielany znakami tabulacji) Otwórz tak spreparowany dokument w Wordzie edycja -> zamień w pole znajdź wpisz ^t w pole zamień na wpisz ^v w efekcie zamienisz wszystkie tabulatory na entery - i powstanie jedna kolumna później trzeba taki spreparowany dokument zaimportować do EXCEL-a
Witam! Chcialbym prosic o pomoc w napisaniu makra do przykladu z załącznika. Chodzi o to aby stworzyc przycisk w zakładce "dane" ktory bedzie zapisywal plik na pulpicie w formacie xls o nazwie z komórki "nazwisko" Chcialbym aby po zapisaniu pliku informacje wpisane do arkusza "dane" zostaly wyczyszczone i przeniesione do akrusza "dane2" ulozone w kolejnosci...
Musisz to odwrócić. Najpierw zapamiętanie nazwy pliku: zapisz w ukrytym arkuszu wartość '.SelectedItems(1)' (path+filename) i użyj jako argument 'Open' (Append lub Output) przy zapisywaniu. Jeśli wszystko odbywa się w jednej sesji, możesz przypisać do zmiennej globalnej. String do zapisu (wiersz arkusza) poskładaj w wewnętrznej pętli For. Żeby było...
Wpisz sobie kilka numerów do książki wykonaj export w zakładce programu do zarządzania (import export). Pojawi się plik z rozszerzeniem crp otwórz go za pomocą exela. Jak już dojdziesz co w której kolumnie wpisywać to do dzieła. Musisz jednak pamiętać o pewnych ograniczeniach np. ilości znaków w opisie numeru (wszystkich razem max16), nadawać kolejne...
Ale nie rozumiem jak jest z zapisem liczby z kalkulatora do jakieś komórki w arkuszu Jak można nie rozumieć, że ty sam napisałes? To znaczy: Z pierwszego arusza "Sheets(1)" odczytaj komórkę A1 i dodaj do niej liczbę z TextBox1 ("TextBox1.Value" = przekształć tekst na liczbę). Wynik zapisz do pierwszego arkusza "Sheets(1)" do komórki A1 = "Range("A1")...
Przedstawione makro nie do końca tylko "zapisuje jako" plik. Ono tworzy nowy plik kopiuje odpowiednie dane (arkusze) zapisuje go pod pewna nazwa i go zamyka. Przy czym, ponieważ jest wyłączony "podgląd", nie widzisz wszystkich kroków. Też tak chcesz stworzyć plik? Czy wystarczy ci "zwykłe" zapisz jako - czyli plik nazwijmy go źródłowym, na którym włączysz...
Może masz wyłączoną obsługę makr. Zapisz plik i otwórz jeszcze raz. Pojawi się komunikat o włączeniu makra? Jeżeli nie sprawdź jakie masz ustawienia zabezpieczeń makr http://obrazki.elektroda.pl/8604730600_1... dodane po chwili : ale zaraz jak moje działa to dlaczego twoje nie ... chmmm interesujące (sprawdz z tym zapisaniem i otworzeniem)...
Oferują sposób - aktywowany Arkusz 2, ma dialogu, który zaprasza zaznaczyc wierszy do edycji. Następnie Kliknij OK - dziala makro Inny sposób zapisz w makro w postaci "1:1 , 5:26, 29:57" np. [syntax=vb] Private Sub Worksheet_Activate() Dim k&, och As Boolean Set arw = Range("2:2, 3:3, 5:8, 12:24") With Me .Unprotect For k = 1 To 11 och = UCase(.Cells(1,...
[syntax=vbscript] Public Sub pobierz() Dim lang As String Dim URLStr As String, DLPath As String, UName As String, PWD As String, DontOverWrite As Boolean Dim zakres As Range Dim Lastrow As Integer Lastrow = ActiveSheet.Range("A1").CurrentRegion.Ro... Set zakres = Range("A2:A" & Lastrow) kat = Dir(Environ("USERPROFILE") & "\Downloads\karty\", vbDirectory)...
pokazyje błąd. Nie powinno tak być, albo nie rozumiem. WYSZUKAJ.PIONOWO(A1;Y!A:B;2;0) tylko wtedy, jeśli LICZ.JEŻELI(Y!A:A;A1)>0 Innymi słowy jeśli w Y jest, w przeciwnym razie zapisz ""(empty string) Czy możliwe by nie zmieniał komórki Arkusza X. jesli nie wyszuka w Arkuszu Y odpowienika ? Nie, bo jesteśmy wszystkie formuły przepisze w klatki kolumny...
Poniżej rozwiązanie z wykorzystaniem VBA Kliknij prawym przyciskiem na nazwie arkusza, z menu kontekstowego wybierz "wyświetl kod". W edytorze VBA wpisz: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then If Target.Value = "x" Then Range("C1") = Range("B1") Else Range("C1") = "" End If End If End Sub Zapisz plik w formacie...
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...
Jeżeli tak to proponuje nagrać makro i podpiąć je pod przycisk (będzie najprościej). Włącz na wstążce zakładkę deweloper Plik-opcje-Dostosowanie wstążki-i w oknie po prawej stronie zaznaczyć Deweloper i OK Na wstążce pojawi się karta deweloper.Otwórz ją. Przejdź na twój pierwszy arkusz. Wciśnij "Zarejestruj makro" Teraz postępuj tak jak zawsze robisz...
Głowię się i nie mogę tego zrobić - jak przypisać polecenie "zapisz jako" do przycisku? patrz załącznik http://obrazki.elektroda.net/66_11710313...
Hmm. Jak się orientujesz w tych wszystkich GoTo? To samo, uzupełnione, w innej wersji.[syntax=vb]Option Explicit Sub Kopiuj() Dim WksDo As Workbook, PierwszyWolny1 As Long, PierwszyWolny2 As Long On Error GoTo koniec If MsgBox("Rozpocząć kopiowanie ?", vbQuestion + vbYesNo) = vbYes Then 'Potwierdzenie rozpoczęcia kopiowania With Application .ScreenUpdating...
dziękuję za pomoc
Przy pomocy makra sprawa jest dość prosta. Zapisz tablicę rozdzielając ciąg funkcją Split . Dwie ostatnie wartości to poszukiwane ciągi. Najprościej napisać funkcję użytkownika. Ha, ale uparłem się na rozwiązanie formułami arkuszowymi :) Jeśli z ostatnim nie ma problemu =PRAWY(A2;DŁ(A2)-ZNAJDŹ(...
- nie twórz nowego obiektu cmd dla każdego rekordu jak i nie dodawaj parametrów. Utwórz zapytanie raz, przed wejściem w pętlę. Dodaj dwa paramtery, nie podając wartości. Zgadza się. Dodatkowo, jeśli driver ma coś w koncepcji "prepare command", należy tego użyć przed pętlą. To "prośba" do serwera aby dokonał czegoś w rodzaju pre-kompilacji i optymalizacji....
Proszę o pomoc, jestem początkujący (bardzo) i mam następujący problem Mam dane w akruszu1 kolejno w kolumnach od A do D 31.05.202113:581020 31.05.202113:587564 ... Potrzebuję skopiować wszystkie wiersze z arkusza1 dla liczby >=31 z kolumny 3 (C) do drugiego arkusza2. Najlepiej jakby skopiowane...
Witam, szanowni koledzy i koleżanki potrzebuje waszej pomocy w stworzeniu dwóch rodzajów makro: - Makro "zapisz jeżeli" - Makro " wyświetl jeżeli" Mój brak umiejętności i wiedzy nie pozwala mi samemu rozwiązać danego problemu. I dlatego spieszę z wytłumaczenie mojego problemu licząc że pomożecie: W komórce "B3" z listy rozwijanej wybieram liczbę (od...
Wejdź w Windows Update i kliknij "Sprawdź aktualizacje", niech sobie zainstaluje wszystkie. Pobierz i zrób skan - usuń wszystko co znajdą: https://pl.malwarebytes.com/adwcleaner/ https://pl.malwarebytes.com/ Skopiuj i wklej do notatnika: Zapisz swoją pracę (Word, Excel itp.) przed wykonaniem polecenia Napraw. CloseProcesses: CreateRestorePoint: EmptyTemp:...
Zapisz się może na kurs Excela. Porównaj Arkusz1 z Arkusz2. Więcej do głowy mi nie przychodzi...
Tu jest szczęście[syntax=vb] Sub KopiaRobocza() Dim nazwa As String Dim path As String nazwa = Range("H19").Value path = "C:\" fileSaveName = path & nazwa & ".xlsx" ThisWorkbook.Worksheets("Kopia robocza").Range("A1:D45").Copy Workbooks.Add Selection.PasteSpecial Paste:=xlPasteValues ActiveWorkbook.SaveAs fileSaveName Application.OnKey "~", "SomeActions"...
Uruchom jako administrator, i odhacz Excel z listy, później zapisz i ponownie uruchom komputer. Są dwa pliki: dla wersji 32 i 64 bit.
Zapisz kopie pliku jako xlsx. Zmień mu końcówkę na .zip Użyj do otwarcia rara zipa lub 7 zipa. Będą w środku pliki w formacie xml i w ich kodzie wyszukaj do czego jest odwołanie Drawing4.vml Dodano po 6 Wstaw tu plik dziennika: https://obrazki.elektroda.pl/5902016800_...
activecell.Offset(0,1)
clubs dzięki za odzew. Niestety nie udało mi się tego zrobić, dziwne, ręcznie jest to po prostu zapisz jako txt, a VBA...? W 1 opcji mam tabelę, więc wykorzystałem metodę QueryTables .QueryTables.Add(Connection:=&qu... & url1, Destination:=Range("$A$1&qu... natomiast muszę też coś "wydłubać" z tekstu strony i tu mam...
Plik ma rozszerzenie xlsm, ale nie posiada makr. To zapisz jako zwykłego 'xlsx' i zobacz.
Patrz post http://www.elektroda.pl/rtvforum/viewtop...
:) makrem przywrócić poprzednie funkcje? można ale nie lepiej (prościej) aby makro tworzyło nowy skoroszyt lub po zastosowaniu makra zamiast naciskać zapisz wciśnij zapisz jako i nadaj nową nazwę cennika np z datą. Przyznam jednak że miałbym wątpliwości aby otworzyć nieznany plik excela w którym jest makro (monit przy uruchomieniu). Wg mnie najlepiej...
Witam, Można zrobić tak by excel zapisał każdy, nawet nowo otwarty plik bez makr, do nowego pliku jako zapisz jako ? Podejrzewam, że można do tego zastosować skoroszyt makr osobistych, ale tak proste zastosowanie jak BeforeClose nie działa :-) Chodzi o zrobienie backupu (przy zamknięciu każdego pliku), gdyż czasem nowo otwarty excel wyrzuca błąd i kasuje...
Hmm... Trochu w VBA już utworzone. Nadzieję, że wiesz, jak nacisnąć F1. Wieczorem będzie więcej, teraz trochę czasu. Na przyszłość - Ja przemianowany arkuszy: 1 -> Form1, 2 -> Form2, 3 - Dictr Dict ionary - Slownik PS Jeśli będą oceniane kilka dostawcy,co ma zrobić kiedy przycisk "Wydrukuj"? OCENA2 - Muszą być wypełnione wszystkie pola?
Dzień dobry, Specyficzną cechą Excela, która na ogół jest uważana za zaletę jest to, że formuły w arkuszu są automatycznie przeliczane po każdej zmianie. Na poziomie arkusza można wyłączyć przeliczanie (tryb ręczny), ale w odniesieniu do całego arkusza, a nie poszczególnych komórek. Więcej można osiągnąć posługując się Visual Basiciem, ale Pan go nie...
przycisk zapisz excel makro excel zapisz excel makro zapisz
multiswitch unicable stolica radio synchronizacja maszyna
podłączyć kondensator rozruchowy podłączyć kondensator rozruchowy
Funkcje pinu 5 RA2 w mikrokontrolerze PIC12LF1571 Lodówka Polar TS136 nie wyłącza się - termostat działa bez przerwy
