[syntax=vbscript]nazwa = ActiveCell.Value With ThisWorkbook .Sheets("wzor rodzinne").Copy ActiveWorkbook.SaveAs .Path & "\rodzinne\" & _ nazwa & ".xls" ActiveWorkbook.Close End With[/syntax]
Jak może nie działać? Wpisujesz minuty do A7? To jest zrobione na przykładnie zaproponowanym przez otapi . Zmienia tylko tyle, że dodaje 0 przed minutami jeśli jest ich mniej niż 10. Sprawdziłem u siebie i działa bez problemu.
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...
Dawno nie zaglądałem na forum i nie spojrzałem że autor założył już temat. A ponieważ zasugerowałem się dawnym (z 2012 roku :) ) kodem kolegi adamas_nt czuję się w obowiązku dołączyć do wątku. :) Przerzucę informację z PW jak przedstawił mi to autor: -- ... Może w skrócie opisze o co mi mniej więcej chodzi: Chciałbym żeby załączony arkusz zaczął żyć...
Niestety nadal jest źle: gdy pierwsze 5 liczb są takie same no 100) to szósta nie wpływa na wynik. Zawsze jest zero. Jednak tak być nie może. Przepraszam za niedogodności. To prawda, jeśli pierwsze pięć liczb jest identycznych, odchylenie standardowe wyniesie zero, co spowoduje, że współczynnik zmienności również będzie równy zero, co z kolei spowoduje,...
a u mnie działa. może zamioast ; wstawiasz , dodaje załącznik. - przy otwieraniu pojawi się monit o tym ze plik posiada makro - jest tam tylko to makro (w module). plik i komputer czysty i sprawdzony antyvirem
Nie chodzi o poziom zabezpieczeń, ale o to drugie. W Excel 2007: http://obrazki.elektroda.pl/6545555300_1... Dodano po chwili Znalazłem taki obrazek (marny, ale coś widać) http://obrazki.elektroda.pl/8544915800_1...
jak zrobić aby nie krzaczyło jak do wizytówki dodaje się polskie litery jest to 'Unicode' Nie probowales otworzyc wizytowku notatnikiem? Moge i gotowce, ale sprobuj sam Zwroc uwage na np. '=54=75=20=7A=61=70=69' Dodano po 32 w VBA jest funcja HEX
Skoro potrzebujesz pomocy przy stworzeniu makra to pokaż co sam zrobiłeś chyba, że jednak potrzebujesz gotowca. W makrze możesz wykorzystać metodę Find, albo funkcję Podaj.Pozycję - Match (znajdzie się jeszcze kilka innych sposobów) do znalezienia szukanej komórki, a wtedy przesuwasz się offsetem o dwie kolumny i wpisujesz wartość.
Kod formatu działa na zasadzie maski, w której elementami wymiennymi są znaki 0 i #. 0 może być wymienione na aktualną cyfrę, a # na aktualną cyfrę lub pominięte. Inne cyfry i znaki (z wyjątkiem tych o specjalnym znaczeniu) pozostają bez zmiany. Dlatego format "1999" zawsze wyświetli "1999", a format "2000" pozwala wymienić 3 ostatnie cyfry na aktualne....
Załączam przykładowy plik excela z makrem liczącym ilośc znaków w zadanym zakresie arkusza. Wynik podawany jest w drugim arkuszu. Makro wybiera kolejno komórki z zakresu, liczy liczbę znaków w poszczególnych komórkach i dodaje narastająco liczbę poszczególnych znaków z zakresu. Arkusz można dostosować do swoich potrzeb, np. wynik podawać w tym samym...
Zrobiłem to tak że program wybiera z tabelki po prawej inicjały (4 pierwsze znaki) czyli jak w tabelce jest J.K. to wybiera te inicjały. I przeszukuje kolumnę K w poszukiwaniu zgodnych inicjałów, (też 4 pierwsze znaki) czyli jak jest( J.K. data) to wybierze tylko "J.K." i dodaje do licznika pozycji zleconych. Dodatkowo jak kolor czcionki jest czerwony...
No, w takiej formie to można już coś tam pokombinować... Zobacz pliki z załączników. Po kliknięciu przycisku "Import order" możesz wybrać plik z zamówieniem - ważne, żeby miał taki układ danych, jak w testowym zamówieniu. Plus wszystkie rzeczy, o których wcześniej mówiłem - wyjątkiem jest lista klientów w pliku produkcyjnym - jednak nie musi być taka...
Witam Wszystkich Jak na obrazku: https://obrazki.elektroda.pl/7048150100_... Opis: A2 ma sumować (dodać/odjąć) dowolną cyfrę z komórki C2, a następnie wyczyścić C2 żeby można było podawać kolejne cyfry. Najlepiej by było: w C2 wpisuję +100 lub -50 to dodaje lub odejmuje od A2 te wartości, a następnie czyści się. Znaki + i - w komórce...
dziekuje widzę, to teraz zagadka co mam zrobić żeby zwiększyć ilość kolumn ??? bo zwiększam np. do 13 i dodaje licz jeżeli i w komórce A3 zmieniam zakres to error...
Dziękuję ślicznie !! TAK oto mi chodziło. Co prawda przerobiłam sobie jeszcze troszkę to makro, tak aby robiło dokładnie to co chcę. Jeśli masz ochotę sprawdzić - to zapraszam - plik dodałam w załączniku. przykład: w rejestrze mam zamówienie na 10 szt silników po 300 euro/szt. produkcja wyprodukowała 4 szt - i te 4 szt wyjechały na jakimś tam dokumencie...
Sub ZamienNaHiperlink() Dim komorka As Range Dim nazwaPliku As String Dim sciezka As String Set komorka = ActiveCell If IsEmpty(komorka.Value) Then MsgBox "Aktywna komórka jest pusta.", vbExclamation Exit Sub End If nazwaPliku = Trim(CStr(komorka.Value)) ' Buduje pełną ścieżkę z podwójnymi ukośnikami sciezka = "file:///D:\as\" & nazwaPliku &...
1. Klikam przycisk "Dodaj wiersz" 2. Makro dodaje jeden wiersz nad wierszem sumy zostawiając formatowania komórek. W tym przypadku numeruje z automatu kolejny wiersz w pierwszej kolumnie a drugi pozostawia pusty Uruchom sobie makro które jest w pliku to zobaczysz. Problem mam że przy wstawieniu tego makro i przypisaniu w nim zakresu "Tabela2" i tak...
Walczę z tym i nie wiem co robię źle :( Jestem zielony w tym, więc dodaje załącznik. Dziękuję za wszystkie wskazówki :)
Jak uważasz, ale osobiście wolałbym mieć wszystko pod ręką, w jednym arkuszu. W załączniku "po mojemu" z blokadą zakresu. W innym przypadku: w A1 wpisz =PRODUKTY!A1 i rozciągnij na zadany zakres, a w opcjach wyłącz wyświetlanie zer.
W jaki sposób utworzyć taki CSV, w którym będzie prawidłowy pełny numer konta ? Podobny problem z importem wyciągów bankowych do Excela rozwiązałem poprzez drobne makro z funkcją Replace, które w pliku csv do każdego ciągu 26 cyfr dodaje przedrostek PL ;-) [syntax=vbscript]Function rePlaceMethodRegEx(regPattern As String, origString As String) '***************************************...
dzień dobry. Jak sumować tylko wartości z komórek z danego zakresu, gdzie jest wartość czasowa a pominąć komórki gdzie jest tylko podana liczba. czas wylicza się z ilości wpisanych wykonanych badań. Czas chcę wyliczyć globalnie dla całego miesiąca nie wybierając pojedyncze komórki a podając cały zakres. W złączniku przykład. Gdy biorę zwykłą sumę dodaje...
Witam Jak napisać makro które będzie przeszukiwało kolumnę A i B http://obrazki.elektroda.pl/4124127900_1... Jeżeli w kolumnie B będzie więcej niż jeden ciąg znaków to dodaje wiersz i scala komórki jak na zdjęciu poniżej wartość z komórki A wkleja do scalonej komórki a wartości z kolumny B z danego wiersza wkleja do oddzielnych komórek...
Nie do końca jest to prawidłowe. (Już przez to przechodziłem :) ) Trochę niepotrzebnie zagmatwałeś funkcje niemniej zobacz, że ci nie będzie działać przy niepełnej dniówce która kończy się w kolejnym dniu rano. Poniżej kod który to "załatwia" ( ja mam inne kolumny - przesuniecie ? ) [syntax=vb] ark.Range("G" & r).Formula = "=IF(F" & r &...
[syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$C$2" Then Application.ScreenUpdating = False nw = Sheets("Baza").Cells(Rows.Count, "A").End(xlUp).Row + 1 Range("A2:C2").Copy Sheets("Baza").Cells(nw, 1).PasteSpecial xlPasteValues Range("A2").Select Application.CutCopyMode = False Application.ScreenUpdating =...
Cześć Proszę pomóżcie. Jak napisać makro, które stwierdzi czy plik Excel na sharepoint jest otwarty przez innego użytkownika. Jeśli tak to makro ma wyświetlić msgboxa i zakończyć działanie. Mam napisane makro które dodaje dane do pliku excelowego na sharepoint ale jeżeli jakiś użytkownik ma otwartego Excela to makro się crashuje.
Zastanawiam się dlaczego nie zamieściłeś swojego kodu... Wstawianie do tabeli nie różni się niczym od wstawiania w komórki poza tabelą. Jedyna różnica jest taka, że jak dodaje się w nowym wierszu tabeli, to jest ona automatycznie powiększana o ten wiersz. [syntax=vbscript]Sub WstawNaKoncu() Arkusz1.Cells(Arkusz1.Cells(Rows.Count, "A").End(xlUp).Row...
Zapewne problem tkwi w (partokrotnym) "sztywnym" odwołaniu do komórki $O$23 w formule. Skopiuj formułę do pierwszego wiersza. Zaznacz tą komórkę i bylejaką inną obok wciśnij CTRL+H i zamień $O$23 na komórkę gdzie masz "stałą" 24:00 np O2 ale pamiętaj o dolarach czyli $O$2. Następnie skopiuj tą komórkę z poprawioną formułą w dół. Myśle że jasno - jak...
Można do tego wykorzystać makro zdarzeniowe, na przykład takie: [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) Dim cel As Range Application.EnableEvents = False For Each cel In Target If Len(cel) > 0 Then If Left(cel, 1) <> "'" Then cel.Value = "'" & cel.Value End If Next cel Application.EnableEvents = True End Sub...
Zobacz Dim so As Long so = Sheets("Start").Cells(Rows.Count, "A").End(xlUp).Row + 1 Cells(so, 1) = so- 1 Cells(so, 2) = textbox1 Cells(so, 3) = textbox2 Cells(so, 4) = textbox3
(at)maciejgonet Dzięki wielkie za pomoc! Miałbym jeszcze tylko pytanie co do działania całego makra. Czy da się z niego wyeliminować zapisywanie w historii sytuacji kiedy ktoś dodaje nowy wiersz? Makro oczywiście wtedy działa tak jak powinno i zapisuje zmiany, czyli zapisuje np. 16000 pustych komórek które zostały dodane przez wstawienie nowego wiersza....
(at)ElektrodaBot dzień dobry, wklejam kod, który dodaje "Tydzień" do tabeli przestawne przy nacisnieciu activex, ale po ponownym naciśnięciu nie usuwa i nie wiem dlaczego. Tydzień to kolumna: [syntax=vbscript]Sub Ukryj_tygodnie_przycisk() Dim pt As PivotTable Dim pf As PivotField Dim pfName As String ' Wskaż tabelę przestawną, którą chcesz zmodyfikować...
mianowicie excel dodaje za dużo nie potrzebnych rzeczy i nie w takim mapowaniu, w związku z czym program nie potrafi rozpoznać danych
Dzień Dobry, Mam problem. Chciałbym stworzyć tabelę na podstawie innej tylko, że w tej nowej tabeli pomijamy puste komórki. Tak żeby tylko wartości się ukazywały jedna za drugą. Poproszę o formułę. Dodaje załącznik.
Kolumna "A" określa grupy (tylko te pozycje, w których występują ukośniki). Kolumna "E" zawiera oznaczenia grup (P2 lub P). Dane do kolumn "A" i "E" wprowadza użytkownik. Kolumna "H" ma zawierać dodatkowe oznaczenia, na podstawie danych w kolumnach "A" i "E". Jeśli dane w "A" i "E" spełniają określone warunki, wtedy makro w kolumnie "H" dodaje kolejne...
Sorry, nie mogę sobie poradzić cały czas zwraca mi ADR. Dodaje przykładowy plik.
Tak Macieju. Str() dodaje na początku spację. (at)Jarofon zaczął kombinować z moim prostym kodem niepotrzebnie wykorzystując Str(). Po co ją dodał, to tylko On wie.
W tym pliku jest poprawnie. Zauważyłem że excel dodaje apostrof ( ' ) do niektórych nazw arkuszy i to może być problemem. Dla "BER" i "Zakupy" tego nie robi ktoś mi powie dlaczego tak się dzieje? https://obrazki.elektroda.pl/7568410900_...
Sprawdź w opcjach (menu: Formuły) czy masz włączone autouzupełnianie. Łatwo to niechcący przełączyć (Alt + Down Arrow)...
dodaje załącznik, procedura ma zamienić tekst z kolumny C na formułę w kolumnie d ale tylko wtedy gdy w kolumnie f jest błąd #AGR!,#N/D!
Mam tylko jeden mały problem - chodzi o sortowanie w kolumnie N . Pobyt dodaje się świetnie i przypisuje do budowy w kolumnie A jednak przy 3 okresach w kolumnie N nie sortuje się od najmniejszej do ostatniego dnia i przypisuje ostatni w kolumnie a nie ostatni dzień pobytu na budowie . Przykład w załączniku . Czy można to jakoś zmienić ???
Cześć, próbuje wykonać plik do zadań z wykorzystaniem UserForm. Zastanawiam się, czy można by było go tak zmienić, aby uniknąć dodawania nowego wiersza? Chciałabym w kolumnie I mieć formułę, która aktualnie jest wklejona w komórce J1, która na podstawie dat wskazywała by mi na status zadania. Aktualnie nie jest to możliwe, ponieważ nowy wiersz dodaje...
Chyba stringi dodaje się operatorem "+", a nie &, nieprawdaż?
dodać odjąć grubości do odpowiednich ścianek - przecież to stolarz po zawodówce w pamięci dodaje np +1,8cm x2.
problem w tym, że nie można klepnąć gwiazdki zamiast spacji bo te teksty są już wpisane a szablon jest naprawdę niemałych rozmiarów... można oczywiście dać "znajdż i zastąp", ale wtedy i tak nie doda gwiazdki na początku i końcu wyrazu. Co do Makra to niestety sprawdzić nie mogę bo nie umię się tym posługiwać :( Dziękuję koledzy za MEGA szybką odpowiedź...
Sorry mój błąd. Pokazuje mi #ADR! a nie #### a w żółtej komórce wpisuje takie coś =WYSZUKAJ.PIONOWO(B11;Lista!A1:A500;2) jakby co dodaje przykładowy plik
Da się to zrobić w ten sposób: 1. wpisać dane kwota netto w kilka wierszy np od 2 do 5, 2. przeciągnąć formułę przeliczenia euro od wiersza 2 poza wiersz 5 o kilka (np 5) wierszy w dół. w miejscach gdzie nie było w wierszach danych kwot netto w kolumnie przeliczników pojawi się 0. 3. zaznaczyć obszar komórek z zerami i nacisnąć "del", nie poprzez usuń...
a jak niby inaczej? W obrębie formuł dodaje się np warunek typu czy.pusta
Witajcie, Czy ktoś pomoże mi stworzyć makro, które wyszukuje wszystkie listy rozwijane w pliku Excel (wszystkie arkusze) a następnie kopiuje do nowej zakładki każdą wartość z "listy" oraz dodaje nazwę range. Przykład w załączeniu... Dzięki.
Usuń z kodu dodawanie przecinka.
licznik dodaje smaczku dodaje dodaje benzyny
immergas wyświetlane błędy termostat powietrza zosia schemat
makita migają diody grundig wkc1703
Ekspres ciśnieniowy Zelmer nie pompuje wody - diagnoza i rozwiązania Mocowanie brzeszczotu w wyrzynarce adapterowej Celma
