Rozbudowałem Ci to makro tak, żeby uwzględniało operacje na kilku komórkach jednocześnie, ale nie zmieniałem zasady jego działania. Więc jeśli zależy Ci na historii wszystkich komórek, musisz przestrzegać pewnych reguł. Makro działa w ten sposób, że po zaznaczeniu komórki/komórek zapamiętuje ich zawartość i adres (procedura SelectionChange). Następnie...
Niestety nie działa :/ Oczywiście, że działa ;) Sprawdza wszystkie komórki w zakresie S340. Innego nie podałeś. Do sprawdzenia zakresu >1 komórka należy zastosować pętlę: [url=http://dzono4.w.interia.pl/kurs/for... Szukanie wolnej komórki: Włącz rejestrator makr i nagraj kilka kombinacji Ctrl+strzałka (w dół/górę). Najlepiej z wypełnionymi...
Nagraj makro w exelu jak wysyłasz wiadomość outlukiem, krok po kroku. Adres do wysłania bierzesz z komórki exela i wszystko co potrzebujesz. Będziesz miał kod. Potem można pozamieniać co trzeba aby działało np. tak że podajesz wiersz z adresem i samo wysyła. Tu też masz opis: https://support.microsoft.com/pl-pl/offi...
Makro nie musi otwierać skoroszytu Szybsze (w działaniu) rozwiązanie tj bez otwierania i zamykania plików może wyglądać tak: [syntax=vbscript]Public Sub wypisz() Set a = ThisWorkbook.Sheets(1) x = a.Cells(Rows.Count, "A").End(xlUp).Row + 1 Set objFSO = CreateObject("Scripting.FileSystemObject... Set objFolder = objFSO.GetFolder("C:\testfolder") 'Tu...
Korzystam z podobnego rozwiązania ale potrzebne jest też formatowanie warunkowe (aby zaznaczać tylko zakres wiersza). Zaznaczanie aktywnego wiersza za pomocą formatowania warunkowego i VBA 1. Zaznaczanie aktywnego wiersza Definiujemy nazwę: AktywnyWiersz=0 Wpisujemy formułę w VBA w sekcji Worksheet - SelectionChange Private Sub Worksheet_SelectionChange(ByVal...
1. Załóż filtr w oryginalnej tabeli (niepuste) -> zaznacz całą tabelę i wtedy dopiero kopiuj dane . Może nawet lepiej wklejać "tylko wartości" niż dane z pełnym formatem każdej kopiowanej komórki. Zrobisz to w jednym ruchu zamiast korzystać z pętli (2000 razy). Po nagraniu makra można edytować zaznaczony zakres tak, żeby najlepiej nam odpowiadał. 2....
W dalszym ciągu nie wiadomo, co zrobić z pozostałą resztą miesiąca... Ale, żeby ruszyć z miejsca, zacznij od przeanalizowania / zdebugowania krok po kroku, takiego kodu, pewnie będziesz musiał poprawić warunki dotyczące rozliczania wolnego i urlopu... a nie umiem sie też odwołać do wartości w scalonych komórkach czy ktoś wie jak to zrobić? Odwołujesz...
Przyjrzałem się bliżej danym w pierwszym arkuszu i... mamy tam parę "kwiatków". Dane nie są spójne, ale ogólnie nie jest źle. Znalazłem ze 4 wyjątki, które na szczęście "mają regułę". Np: http://obrazki.elektroda.pl/2132347100_1... http://obrazki.elektroda.pl/4068974900_1... Adres też zapisany jest różnie, od lewej: "ul",...
Problem wydaje mi się trochę udziwniony, bo jeżeli minuty są potrzebne, to dlaczego nie ma być zer gdy są tylko pełne godziny? Dwukropek oczywiście można zastąpić przecinkiem, tylko czy to jest lepsze? Wszak minuty nie są setnymi częściami godziny. Natomiast format czasu nie jest tak elastyczny, żeby można było pominąć minuty gdy są równe 0, a wyświetlać...
1. Zmienne te muszą być liczbami, np. musi być: kol_pocz = 1 wiersz_pocz = 1 kol_fine = 27 ' (27 jest nr kolumny "AA") wiersz_fine = 100 2. "ZZ" - nie ma takiej kolumny (excel 97). 3. Makro to dla dużych zakresów będzie liczyło bardzo długo (musi przejść wszystkie komórki) 4. Należy usunąć wywołanie okien INPUTBOX i zmiennych z nim związanych (lub poprzedzić...
W c ten program gdzies w internecie widziałem.. Bedzie wymagał być moze małego dostosowania. Mam go ale niestety w asm pod atmege 16. ; Programowalny pilot RC5, obsługa interfejsów optycznych i pamięci EEPROM ; Rafał Baranowski (C) 2004 .INCLUDE "m16def.inc" ; SEGMENT DEKLARACJI .EQU OSC_FREQ= 1000000; częstotliwość pracy w Hz .EQU...
Przejrzyj dobrze kod. Ostatnią funkcję masz "zaremowaną". [syntax=vb]'Call GetOnlyGoodValues(x1, x2, x3, x4, x5, x6, x7, x8, x9)[/syntax] Wewnątrz GetOnlyGoodValues wykonywane jest przeszukiwanie. Działa to dobrze bo sprawdzałem, ale generowanie czegokolwiek trwa baaaardzo długo. Zapis do komórek Excela mija się z celem o czym już pisałem. Właśnie dodałem...
Napisz to jaśniej i załącz przykładowy plik. Jeśli plik źródłowy jest otwarty (w tej samej instancji Excela), to nie jest potrzebna ścieżka, wystarczy nazwa pliku. Co to znaczy: "Wprowadzenie odwołania do innego (otwartego pliku)"? Gdzie ma być wprowadzone to odwołanie? Do komórki arkusza? Do jakiegoś okna dialogowego wyświetlonego przez makro? Czy...
Witam, od niedawna próbuję pisać proste makra ale teraz przede mną cięższy temat... Mam plik excel . Kolumna A zawiera informacje o problemie, B - zadania do wykonania, C - termin, D - osoba odpowiedzialna na zadanie, E- adres mailowy tej osoby. Jest ook 100 wierszy z różnymi zadaniami. Za kilka działań może byc odpowiedzialna ta sama osoba. Czy istnieje...
Makro musiało Te makro to właśnie wstawianie 'wyszukaj.pionowo'
Witaj, Musisz gdzieś w takim razie zapisywać aktualny stan, albo wykrywać pierwszą pustą komórkę w zakresie pracy Twojego makro (o ile konstrukcja arkusza na to pozwoli).
Cześć! Drodzy forumowicze! Mam przed sobą następujące zadanie. Piszę makro które ma za zdanie wysłać maila na wskazany adres pobierając dane (jako treśc maila ) z komórki A1 oraz A2 ale ma wysłać taką wiadomość dopiero kiedy w tym wierszu w którejkolwiek z kolejnych komórek A3-A10 pojawi się umowiony symbol np: 1. Makro powinno działać dla wszystkich...
Witam mam taki problem, potrzebuję makro które by z eksportowanego pliku xls dane komórki np. komórka B2 zawierająca datę, C5 zawierającą jakieś dane jak imię nazwisko i adres kopiowało do bazowego pliku excela z tym żeby pobraną komórkę ze źródła napisaną z enterami (ch10) i rozdzielało do poszczególnych komórek w bazowym pliku, czy coś takiego da...
Bo on nie jest uniwersalny, tylko "szyty na miarę" do tamtego skoroszytu. Pojawiają się jakieś błędy w czasie działania makra? Pierwsze do sprawdzenia w kodzie to nazwy arkuszy z tabelą przestawną oraz listą dystrybutorów oraz adres komórki w której jest nagłówek "dystrybutorzy" w tabeli przestawnej. [syntax=vb]shArkPvTbl.Range("A5").Curren...
Po naciśnięciu na przycisk commandbutton, otwiera się "Wstawianie hiperłącza", po wybraniu pliku, dodaje adres do następnej wolnej komórki w wybranej kolumnie. Wprawdzie makro nie działa poprzez okno "Wstawianie hiperłącza", ale wstawia łacza, podepnij je sobie pod przycisk. [syntax=vb]Sub Dodaj_Hiperlacze() Dim iCol% 'kolumna aktywnej komórki Dim...
Funkcja jest, nazywa się: [syntax=vb]=KOMÓRKA("adres";A1)[/syntax] albo [syntax=vb]=ADRES(WIERSZ();NR.KOLUMNY())... nie wiem czy i w jaki sposób to ma rozwiązać Twój problem... Raczej bym zdjął to hasło albo napisał makro do wypełniania tych komórek co chcesz albo pokombinował z kopiuj-wklej specjalnie.
ale jeśli koleyno wklej do A1, A2 ... to następujące dane zastępują poprzednie dane i B1 zmieni wynik, ponieważ formuła nie jest wyjściem w tej sytuacji może po prostu zrobić makro oczywiście pozwolić makro
Można przypisać dowolną kombinację klawiszy do makro wyszukiwania (żeby łatwo było je uruchomić) np. takiego: Cells.Find(What:=Cells(1, 1), After:=ActiveCell, SearchOrder:=xlByColumns).Select Jeszcze lepiej zastosować przypisanie opisane w moim poprzednim poście (...)What:=strSzukana(...). Do szukania tylko w 1 kolumnie można...
Witam ponownie. Ponownie potrzebuję pomocy mistrzów excela :) [syntax=vbscript]Sub Send_Range() ' zakres ActiveSheet.Range("A6:G6").Select ' envelope ActiveWorkbook.EnvelopeVisible = True ' opcje With ActiveSheet.MailEnvelope .Introduction = "This is a sample worksheet." .Item.To = "xxx(at)xx.pl" .Item.Subject = "AWARIA" .Item.Send End With End Sub[/syntax]...
A co jeszcze zostanie? Chyba nic.;) Czyli faktycznie przegiąłem... No nic , będę musiał walczyć dalej sam. Pętelka , którą mam (makro) pięknie skacze po arkuszach i wywołuje makro do wysyłki email , przerobiłem to makro aby wysyłało na adres z komórki "D1" z aktywnego arkusza - no i ładnie to wysyła. Przecież nie pisałem "macie mi to zrobić" tylko...
Witam! Przeszukałem fora, tutoriale straciłem sporo czasu ale problem nie rozwiązany pozostał: PROBLEM: W komórce a1 mam już hiperłaczę które jest hiperłączem dynamicznym opartym na formule (=HIPERŁĄCZE("#ARKUSZ1"&ADRES(PODAJ.POZY... dane i kliknij TU!") Teraz próbuje zbudować makro które skopiuje mi...
witajcie może ktoś z was pomoże poszukuje takie makro które z kolumny A wyszuka np numerek 3532 i jak go znajdzie to z wiersza oraz zadanych komórek kopiuje dane do notatnika z góry dzięki za pomoc Dodano po 1 jest progress , dziękuje a jeszcze mam prośbę jak ewentualnie skopiować komórki z tytułami przed wartościami dla przykładu jeżeli mam załóżmy...
Dokładnie o to mi chodziło! :) Wielkie dzięki! Jednakże niestety tutaj pojawił się kolejny problem: a mianowicie nie do każdej komórki wprowadzam jakies dane, i jeśli tego nie zrobię, to analogicznie pojawia sie błąd #ARG. Chodzi o to, że dalej mój skrypt sumuje wszystkie powstałe wartości, i #ARG przeszkadza w sumowaniu. Mógłbym zrobić na przykład:...
Niestety nie interesuje mnie wysyłanie do wszystkich tylko do pojedynczych osób.. Do korespondencji seryjnej możesz wykorzystać bazę z jakimś polem od którego będzie zależało czy adres się drukuje czy nie.(wstawiasz w to pole np. jakiś krzyżyk) Nie musisz drukować całej bazy za każdym razem. Tu na pewno coś znajdziesz Korespondencja seryjna jest mi...
Chcę zrobić coś takiego: jestem w wierszu powiedzmy 4 obojętnie w której kolumnie i chcę po naciśnięciu przycisku aby kopiowało mi zawartość komórki o adresie kolumna F i zaznaczony wiersz ( w tym przypadku F4) do innej komórki. Dodano po 13 Dodano po 2 Błąd jest w tym zapisie Dodano po 40 [syntax=vbscript] Cells(ActiveCell.Row, 6).Select [/syntax]...
Jednak uwielbiam proste rozwiązania :) Wklej w kod arkusza wynikowego takie makro [syntax=vbscript]Option Explicit Option Compare Text Private Sub Worksheet_Change(ByVal Target As Range) Dim myPath As String, myFile As String Dim ark As String, rn As String, arg As String If Target.Address(0, 0) = "A3" Then myPath = "G:\TP\01. Administration\1.1 Work...
Wersja mieszana, tj. i z hiperłączami "na funkcjach" i z hiperłączami "na makrach". 866050 Ścieżkę dostępu możesz określić dla każdego projektu oddzielną, to tylko niewielkie zmiany w makrze "Workbook_Open", które w ogóle możesz wyłączyć/skasować i ścieżki wpisać ręcznie - mnie się nie chciało tworzyć różnych ścieżek dla poszczególnych projektów. Ilość...
Witam, Makra - fajna sprawa. pod warunkiem że umie się je pisać :) Jak znajdę coś co mogę wykorzystać (tak mi się wydaje), to im dłużej czytam mniej wiem. Bez pomocy z zewnątrz nie dam rady. Potrzebuję makro, które z folderu „W” ze wszystkich plików xlsx.(A, B, C, D) przejdzie przez każdy plik oraz po każdej zakładce i zwróci mi do pliku...
Znalazłam na waszej stronie poniższe marko : [syntax=vbscript]Public Sub wypisz() Set a = ThisWorkbook.Sheets("BUD") x = a.Cells(Rows.Count, "A").End(xlUp).Row + 1 Set objFSO = CreateObject("Scripting.FileSystemObject... Set objFolder = objFSO.GetFolder("Y:\CGEurope\Files\SOC Reports\2020\Bridge files") 'Tu trzeba wstawić ścieżkę roboczego folderu For...
Sprawdz w pomocy opis funkcji ADRES(); np: =ADRES(2;3;1;FAŁSZ;"Arkusz2") W tym przypadku to się nie przyda bo z ręki byś musiał zmieniać dwa pierwsze parametry a i nie da się tu wykorzystać funkcji wiersz i nr.kolumny bo odnoszą się one do wskazanej komórki a nie do formuły wpisanej w tej komórce. Zostaje tylko makro lub włączenie w opcjach w zakładce...
Super, wielkie dzięki. Brakuje mi tylko wisienki na torcie tzn: skoro już pobiera adres obrazu z komórki to po co wyświetla mi okno do wyboru pliku. Idealnie by było gdybym tylko włączył makro a ono wstawiło obrazek bez pytania skoro ścieżkę pliku ma podaną w komórce. Teraz wygląda to tak: " Sub Nieobudowany() ' ' Nieobudowany Makro ' Option Explicit...
to makro rzeczywiście jest prostsze i sumuje wszystkie komórki A1 do UZYWANE A1, B1 do B1, C1 do C1 itd. Ale tylko z A1 do A1 bo nie wiem jak to zmienić docelowo aby np można by było samemu edytować, że źródło to np A1 a adres docelowy to np B1. Ale to w sumie najmniejszy tu problem bo mogę stworzyć arkusz docelowy na wzór arkuszy źródłowych i nie będę...
Witam, Nie mam pojęcia jak się do tego tematu zabrać. Mam pole kombi (1,2,3). Po wybraniu 1 powinien otwierać się inny plik do którego kopiowane byłyby dane z niektórych komórek arkusza z polem kombi. Po wybraniu 2 chciałbym automatycznie wysłać email na ściśle określony adres z wartością komórki z bieżącego arkusza w temacie i treścią wiadomości z...
jak ustawić by w komórce "B2" wyświetlała się wartość z formantu, czyli np. "10-20%"zamiast "2" Zacznę od końca. Pewnie da się to zrobić na kilka sposobów, ja bym to zrobił tak: - przeniósłbym wynik listy rozwijalnej z B2 gdzieś poza widoczną część arkusza, załóżmy chwilowo że do Z2. Wiersz ten będzie można ukryć, bo w arkuszu nie będzie on przydatny...
Chyba źle do tego podchodzisz. Nawet gdybyś chciał wstawić, jak piszesz, jakiś symbol, musisz znać adres komórki - w tym Nr wiersza. Ale skoro znasz numer wiersza, możesz zacząć szukać od wiersz+1 w następnym vLookUp. I mamy masło maślane. Nagraj sobie takie makro: Zaznacz kolumnę A, naciśnij Ctrl+F i kilka razy naciśnij przycisk "Znajdź następny"....
Jak już znajdzie to masz adres komórki i możesz z nim kombinować Sub szukaj() gdzie = ActiveCell.Address On Error Resume Next Columns("B").Select 'przypisanie adresu komórki zawierającej szukany tekst do zmiennej znalezione = Selection.Find(What:="AM.1.... Logging/004a IIS Failure Access Audit", LookAt:=xlPart).Address...
Jak zdołałem się zorientować ze schematu makro Kod: #define ADDR_SHIFT(A) (NOR_FLASH_START_ADDR + (2 * (A))) jest potrzebne na przesunięcie adresu ponieważ do linii adresowej A0 pamięci flash podpięta jest linia adresowa A1 (P4.1) LPC4088. Rozumiem, że odwołując się do adresu 0x90000001 kontroler EMC ustawi stan wysoki na P4.0, a ponieważ...
Cześć Chciałbym stworzyć makro, które wysyłało by emaile z listy z excel’a i dołączało spersonalizowane załącznik. W Arkuszu „lista” są komórki z spersonalizowanym numerem odbiorcy od „b6” do „b5006” np. D001425 a w komórkach od „c6” do „c5006” adresy email. Chciałbym aby pętla do każdego...
Witam. Jest to jak najbardziej możliwe np formułą: =ADR.POZR(G8) a w g8 adres do komórki (zwykły tekst) ''C:\Users\Desktop\[Zeszyt1.xlsx]Arkusz1... Wtedy w komórce w której jest pierwsza formuła pojawi się wartość z drugiego arkusza. Tylko oba arkusze muszą być otwarte żeby to działało. Wydaje mi się że dużo wydajniejsze było by makro kopiujące dane...
Co masz na myśli pisząc że "nie działa"? U mnie działa zgodnie z opisem... Komentarze do poszczególnych linii: [syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) 'w zdarzeniu przy zmianie w arkuszu If Target.Address = "$A$1" Then 'jeżeli adres komórki której dotyczy zmiana = A1 ost_w = Worksheets("Dane").Range("A" & Rows.Count).End(xlUp).Row...
Tak na szybko spróbuj : Sub Makro1() arkuszdane = InputBox("podaj nazwę arkusza z danymi") kol = CInt(InputBox("Podaj kolumne z danymi")) wier = CInt(InputBox("Podaj pierwszy wiersz z danymi")) ile = CInt(InputBox("Podaj ile jest wierszy z danymi"))...
Wielkie dzięki za pomoc. Przekazuję Koledze parę punkcików za dotychczasowe wsparcie. FPS może być w dowolnej kolumny, ale wszystko ma się rozpocząć w pierwszym wierszu. Jeśli inaczej, proszę powiadomić Kolorowanie powinno zacząć się od drugiego wiersza. Czy w tym makrze można wybrać pojedynczą kolumnę do kolorowania (np. makro ma kolorować kolumnę...
Nie mam zabardzo czasu na siedzenie nad tym problemem, ale w zamian podaję parę różnych przydatnych rozwiązań do tego programu. Myślę że sobie poradzisz, analizując pewne chwyty w VBA. Uwaga! podane przykłady nie są rozwiązaniem problemu, są tylko fragmentami mozliwymi w większej lub mniejszej części pomóc w pracy nad arkuszem. 1. Przepisuje na bieżąco...
Tak szczerze, zaraz wytłumaczę dlaczego "gotowiec" by mi się przydał: znam się tak "trochę" na excelu, ale na podstawowych funkcjach itp, nic nie wiem na temat makr, vba itp i moje rozumowanie w przypadku twojej odpowiedzi wygląda tak: " ustalasz ilość wierszy do wyszukiwania na podstawie ostatniej nie pustej komórki w kolumnie E" - GDZIE USTALAM TZN...
Dzień dobry, Dziękuję za wyjaśnienie w kwestii sumy liczb nieujemnych. Tak jak myślałem, chodzi o to, żeby co najmniej jedna wartość była niezerowa, więc jeśli liczby są nieujemne, właściwym kryterium jest suma. Formuły z ostatniego postu znowu nie rozumiem, bo w tej wersji, którą Pan załączył w komórkach B166 i C166 nie ma żadnych liczb. Ale zostawmy...
adres komórki adres komórki zmienna excel adres komórki
zmywarka bosch otwiera suszarka włos instrukcje obsługi indesit pralki
pęknięta sprężyna przód pomiary kierunku silnika
Komputer wyłącza się po wymianie Intel i5-7400 na i5-9400 Jak zbudować generator sinusoidalny na tranzystorach?