inputbox excel

Znaleziono około 186 wyników dla: inputbox excel
  • [makro] Excel drukowanie - potrzebuję pomocy

    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...

    Programowanie Początkujący   10 Gru 2009 14:52 Odpowiedzi: 3    Wyświetleń: 5657
  • Excel - kopiowanie wartości z komórki w zależności od daty w innej komórce

    Yogi (przypominasz mi dzieciństwo) ;). Nie pamiętam, czy był to 'Zwierzyniec', czy też 'Ekran z bratkiem'. Ale autor napisał: potrzebuję makro A do Autora. Może ten kod będzie wygodniejszy (jest bez obsługi błędów, sam się pobaw): [syntax=vb]Sub Przenies() Dim d As Date, p As Date, k...

    Software serwis   04 Lut 2015 16:11 Odpowiedzi: 13    Wyświetleń: 2124
  • Excel 2013 - Listbox wstawianie wartości z listy do komórki arkusza

    Dzięki Clubs, Zrobiłem coś takiego ' Pokazanie okna do wprowadzanaia wartości Range("A2").Value = InputBox("Podaj datę paragonu") Range("B2").Value = InputBox("Podaj kwotę paragonu") Range("C2").Select Kategori... = InputBox("Wybierz podkategorię paragonu") Range("E2").Value...

    Programowanie Początkujący   16 Maj 2016 07:50 Odpowiedzi: 6    Wyświetleń: 2250
  • Problemy z wartościami Excel

    Do każdej komórki bieżącego arkusza masz dostęp przez Cells(wiersz, kolumna).Value gdzie wiersz jest liczbą w zakresie od 1 do 65536, kolumna to liczba od 1 do 255 (w arkuszu są to litery A, B,...,Z, dalej pary liter AA, itd di IV). Zatem komórka B5 to Cells(5,2) , a U5 to Cells(5,21)....

    Programowanie Początkujący   22 Gru 2009 21:45 Odpowiedzi: 9    Wyświetleń: 1746
  • Excel-makro zmieniające dane znaki na polskie litery

    Może InputBox? Np tak przeróbka makra wyżej[syntax=vb](...) On Error Resume Next wrs = InputBox("Podaj Nr wiersza początkowego", "Proszę wpisać liczbę", 6) max = InputBox("Podaj Nr wiersza końcowego", "Proszę wpisać liczbę") On Error GoTo 0 If wrs < 2 Then Exit Sub If wrs > max Then max...

    Software serwis   12 Lip 2012 17:35 Odpowiedzi: 18    Wyświetleń: 10194
  • Sortowanie w Microsft Excel

    Dodano po 20 Dodano po 1 A tak wygląda zoptymalizowany kod po zjedzonym obiadzie: ;) [syntax=vb]Sub Sortuj() Dim OstW As Long, s As String Sheets("Dane").Select OstW = Cells.SpecialCells(xlCellTypeLastCell).R... = InputBox("Podaj wartość do sortowania:", "Sortuj wartość") Range(Cells(2,...

    Software serwis   06 Gru 2012 16:16 Odpowiedzi: 6    Wyświetleń: 1137
  • Excel - Wykres przestawny i makro

    Z drugim zadaniem poradziłem sobie tak: [syntax=vb]Sub Data() ' ' Data Makro ' 10 myday = InputBox("Podaj dzień.") If myday <> "" Then If IsNumeric(myday) Then Selection.FormulaR1C1 = myday Else MsgBox "Nie podales dnia." GoTo 10 End If ...

    Software serwis   31 Maj 2013 11:10 Odpowiedzi: 5    Wyświetleń: 1470
  • [VBA Excel] - Filtr po zakresie ze zmiennymi

    Próbuje zrobić makro które po wprowadzeniu w inputbox dat od i dat do założy filtr na dane i zapisze go do PDF problem jest z filtrem. Po wprowadzeniu nie wyświetla żadnych danych mimo iż kryteria się wprowadzają, dopiero jak kliknę "ok". Dane się wyświetlają, poniżej kod: Dim data_Od As Date ...

    Obsługa oprogramowania   30 Sie 2019 21:18 Odpowiedzi: 1    Wyświetleń: 264
  • VBA Excel - import wybranych plików *.dat do excela

    Po mojemu powinno działać coś takiego (nie testowane)[syntax=vb]Sub Przycisk1_Kliknięcie() Dim path1 As String, path2 As String, plik As String Dim folder As Object, pfolder As Object Dim dta1 As Date, dta2 As Date, nazwaMin As String, nazwaMax As String Application.ScreenUpdating = False path2...

    Programowanie Początkujący   10 Mar 2012 06:41 Odpowiedzi: 5    Wyświetleń: 4833
  • VBA Makro - InputBox wstawiający tekst do aktualnie zaznaczonej komórki

    Cześć! :) Mam taki problem: Mam plik Excela z listą osób: Liczba porządkowa (kolumna B), imię i nazwisko (kolumna C), potem miesiące (od stycznia do grudnia) i suma w kolumnie P. Chciałbym zrobić makro, za pomocą którego wyskoczy mi InputBox, w którym będę mógł dopisać na końcu listy nową osobę....

    Programowanie Początkujący   05 Gru 2018 15:45 Odpowiedzi: 1    Wyświetleń: 1164
  • Pobieranie danych z pliku Excela przez VBA

    Witam, mam plik Excela z ok 15000 wierszy. Znalazłem poniższy kod, ale pobiera mi tylko ok 10000. Poradzi ktoś coś? Dim wkbCrntWorkBook As Workbook Dim wkbSourceBook As Workbook Dim rngSourceRange As Range Dim rngDestination As Range Set wkbCrntWorkBook = ActiveWorkbook ...

    Obsługa oprogramowania   03 Cze 2022 11:32 Odpowiedzi: 1    Wyświetleń: 141
  • Excel - Wprowadzanie danych TYLKO I WYŁĄCZNIE za pośrednictwem listy rozwijanej

    Witam ponownie :) Międzyczasie, wpadłem na inne rozwiązanie. Porzuciłem listę rozwijaną i napisałem takiego oto makro: Sub Raportowanie_kompletacji() Dim Zlecenie As String, i, j As Long, Status As String, Komponent As String j = 0 'odblokowanie arkusza ActiveSheet.Unprotect Zlecen...

    Software serwis   05 Mar 2014 15:39 Odpowiedzi: 10    Wyświetleń: 5028
  • [VBA Excel] - Protect/Unprotect, a udostępnienie skoroszytu

    Witam, W momencie, gdy udostępniam skoroszyt excel innym użytkownikiem, przy wywołaniu makra mam poniższy błąd: Run-time error '1004': Metoda Unprotect z klasy Worksheet nie powiodla sie. Do wyboru przyciski End i Help.... Wie ktoś jak to ominąć? Dodatkowo: poniższy kod powstał tylko i wyłącznie,...

    Programowanie Początkujący   05 Mar 2014 19:16 Odpowiedzi: 1    Wyświetleń: 2136
  • Excel prosze o podpowiedź jak napisać program/funkcje

    Najprościej wykorzystać MsgBox i InputBox. Procedura wg schematu: If MsgBox("czy jest to kolejny protokól z serii", vbQuestion + vbYesNo) = vbYes Then Cells(wiersz, kolumna) = WorksheetFunction.Max(zakres) + 1 Else Range(zakres).Find(What:...

    Programowanie   10 Maj 2010 17:56 Odpowiedzi: 4    Wyświetleń: 3703
  • [Excel, Vba] Usuwanie całego wiersza.

    Jeśli jednocześnie to For ark = 1 To 2 With Sheets(ark) For i = .Cells(65536, "a").End(xlUp).Row To 2 Step -1 If .Cells(i, "a").Value = "" Then .Rows(i).Delete shift:=xlUp End If Next End...

    Programowanie Początkujący   28 Sie 2010 13:00 Odpowiedzi: 8    Wyświetleń: 21579
  • VBA excel: formatka blokuje arkusz

    Wygląda na to, że słabo sprecyzowałem mój problem. Chodzi mi o to,że w momencie, gdy wyświetlona jest formatka z textbox'ami to nie mogę przesunąć arkusz, aby wyszukać dane do wpisania w te textbox'y. Podobnie mam w innym makro. Uruchamiam makro, pojawia się inputbox z poleceniem wpisania danych z arkusza....

    Programowanie Początkujący   08 Kwi 2011 17:22 Odpowiedzi: 5    Wyświetleń: 3731
  • Makro excel znajdywanie danych i zamiana

    To pewien "mankament" VB dla VB liczba z przecinkiem jest "ciągiem" a z kropką jest wartością. W związku z tym trzeba takie przecinki zamieniać "ręcznie" Poniżej kod [syntax=vb]Sub ChgInfo() Dim WS As Worksheet Dim Search, Search2, Replacement, Prompt, Title, Zakres As String Dim MatchCase...

    Software serwis   25 Sty 2012 12:28 Odpowiedzi: 25    Wyświetleń: 3516
  • Excel jak zrobić formułę lub odnośnik

    Może spróbuj przez podstawianie formuł. Makro przetestowałem na arkuszu "Zmiana N". Jeśli to jest to, to masz już z górki.[syntax=vb]Sub Proba() For j = 6 To 10 Step 2 zmF = InStr(Cells(3, j).Formula, "KW") zmF = Mid(Cells(3, j).Formula, zmF, 4) zmR = InputBox("W kolumnie " & j & "...

    Programowanie Początkujący   10 Kwi 2012 06:36 Odpowiedzi: 5    Wyświetleń: 4984
  • [VBA][Excel]Przesuwający się zakres komórek do wykresu

    (...) przesunięcia zakresu DataRangeOBAYield o 7 wierszy w prawo dla każdego z dwóch zakresów (...) Chodzi o wiersze w dół, czy kolumny w prawo? Można zastosować InputBox, gdzie wpisywane będzie przesunięcie: 0 - B1:H1,B31:H31 1 - o siedem wierszy/kolumn w z góry upatrzoną stronę itd, jeśli jest...

    Programowanie Początkujący   15 Sie 2012 12:36 Odpowiedzi: 2    Wyświetleń: 2414
  • Excel - Ekstrakcja Danych

    Okay, to moze innaczej. Moze ktos by mi pomogl tak przerobic ten skrypt, zeby szukal w okreslonej stalej lokalizacji i zawsze zwracal wartosci do okreslonej lokalizacji? Teraz wszystko trzeba manualnie okreslac. Dzieki. [syntax=vb]Sub ListUniqueValues() Dim SearchRng As Range ...

    Software serwis   05 Lis 2012 20:56 Odpowiedzi: 6    Wyświetleń: 1752
  • Excel 2010 - Makro -wypełnianie i drukowanie

    Jeśli nie miałeś do czynienia z formularzami, to najprościej zamknąć InputBox w pętli w Thisworkbook, przy zdarzeniu Open. Coś jak[syntax=vb]With Sheets("NazwaArkusza") For i = to 10 .Cells(i, 2)= Inputbox ("Wpisz wartość dla komórki B" & i) Next .activate End With[/syntax]Dograj...

    Programowanie Początkujący   04 Gru 2012 10:17 Odpowiedzi: 5    Wyświetleń: 1635
  • Excel Makro pętla z kopiowanie -

    Spróbuj z InputBox'em: [syntax=vb]w = 14 ile = Int(InputBox("Ile?", "Wpisz liczbę całkowitą", 3)) If ile < 1 Then Exit Sub Application.ScreenUpdating = False Range("A16:V29").Copy For i = 1 To ile Range("A" & 16 + w).Select ActiveSheet.Paste w = w + w Next Application.CutCopyMode...

    Programowanie Początkujący   24 Lip 2013 08:13 Odpowiedzi: 2    Wyświetleń: 1320
  • VBA Excel - błąd w funkcji

    Witam, czy mógłby mi ktoś pomóc znaleźć błąd w tej funkcji? Sub zad16() Dim x As Single Dim y As Single Dim z As Single x = InputBox("Podaj swoją wagę w kilogramach") y = InputBox("Podaj swój wzrost w metrach") z = x / Sqr(y) If z > 0 And z < 20 Then MsgBox "Niedowaga" Else If...

    Programowanie Początkujący   23 Maj 2014 19:41 Odpowiedzi: 6    Wyświetleń: 1206
  • [VBA] [Excel] - podział pliku

    Witam serdecznie, Potrzebuje napisać makro, które znacząco przyspieszy mi prace. Chodzi o to by dzieliło gotowy raport na części i każdą z nich zapisywało w oddzielnym pliku pod nazwą taką jak wartość w kolumnie. Dla ułatwienia (w celach poglądowych) stworzyłem mocno uproszczoną wersję tego raportu. Chodzi...

    Programowanie Początkujący   30 Lip 2014 21:25 Odpowiedzi: 2    Wyświetleń: 2241
  • Excel vba -komórki z Alt+Enter - Rozbijanie komórek z Alt+Enter i odwrotnie

    makro działające w drugą stronę Wg tę samą wartość pola 'Pozycja' ? Zanim można sortować je? W tabeli zawsze 5 kolumn? Alt+Enter tylko w ostatnich trzech kolumnach? Dodano po 1 [syntax=vb]Sub Rozbijanie() Dim bs As Range, bd As Range Dim rs&, rd& rs = CLng(InputBox("Rozbij...

    Programowanie Początkujący   19 Sie 2015 21:40 Odpowiedzi: 2    Wyświetleń: 1389
  • Excel,VBA - zamiana wyszukanego tekstu i podmiana

    Nie próbujesz nawet realizować sugerowanych najprostszych rozwiązań :cunning: Wszyscy, którzy mają jakiekolwiek doświadczenie z VBA doskonale wiedzą co to znaczy nagrywania makra :D Chodzi o utworzenie samodzielne np takiego makra: [syntax=vbscript]Sub Makro1() ' ' Makro1 Makro ' ' Klawisz...

    Programowanie Początkujący   16 Kwi 2018 10:51 Odpowiedzi: 9    Wyświetleń: 3123
  • Jak mozna zmienic/ulepszyc/poprawic ten kod excel vba

    Witajcie po raz kolejny potrzebuje waszej pomocy Szczerze mowiac to nawet nie za bardzo wiem jak opisac ten przypadek , ale sprobuje. W userform1 wpisuje kwote zakupu ktora jest przerzucana do userform11 jako label58 oraz textbox_punkty, nastepnie w TextBox_Klient wyszukuje klienta i po podwojnym kliknieciu...

    Programowanie Początkujący   10 Mar 2018 17:41 Odpowiedzi: 0    Wyświetleń: 453
  • Excel - VBA - zmiana danych wpisanych po przecinku

    Cześć, na początku napiszę, ze dopiero zaczynam swoją przygodę z VBA więc byłabym wdzięczna za w miarę dokładne odpowiedzi. Mój problem polega na tym, że potrzebuję dla dużej ilości danych zastosować coś w rodzaju słownika. Przykładowo: w jednej kolumnie w kolejnych komórkach mam dane w języku...

    Obsługa oprogramowania   20 Sie 2019 08:21 Odpowiedzi: 7    Wyświetleń: 336
  • Excel VBA Tworzenie wykresu z wypełnionych komórek

    A jak w takim razie zrobić to w tym makrze gdy moją pętla ma dodatkowo określony krok a ja chce żeby wykres obejmował każdy obszar zależnie od tego jakie t podamy? Możesz konstruować zakresy w różny sposób. Jeśli wykorzystujesz obiekt Range, to adres musi być tekstem, a tekst ten może być zbudowany...

    Programowanie Początkujący   09 Cze 2020 10:11 Odpowiedzi: 8    Wyświetleń: 720
  • Wywołanie UserForm - i zablokowanie excela

    ...jak kliknę w Excel na pasku to pojawia się cały arkusz - czy nie da się zablokować tej możliwości ? Chodzi mi o to, aby nie można było pokazać arkusza. Najprościej zminimalizowany plik Excela ukryć. Rozszerz procedurę UserForm_Initialize o linijkę kodu wykorzystującą właściwość "Visible" [syntax=vb]Private...

    Programowanie Początkujący   10 Lis 2015 12:01 Odpowiedzi: 13    Wyświetleń: 17508
  • VBA EXCEL - Edycja txt, generuje dodatkową pustą linijke

    gdyż mam makro które tworzy mi CSV Napisałem na szybko takie coś: [syntax=vb] ''' <summary> ''' Zapisuje bierzący arkusz do pliku CSV ''' </summary> Sub SaveCSV() Dim R As Range Dim cmax As Integer Dim rmax As Integer Dim srow As String Dim fname As String ...

    Programowanie Początkujący   30 Gru 2012 12:52 Odpowiedzi: 3    Wyświetleń: 2643
  • Excel - Filtrowanie w excelu

    Owszem to filtrowanie danych ale w żadnym wypadku nie powinno być powiązane z auto-filtrem, tym bardziej jak masz excel 2003 i poniżej. Tu masz kod. Tłumaczyć? [syntax=vb]Sub Makro1() Dim ostWrs As Long, x As Long Dim tekst As String, szukane As String ostWrs = Range("B" & Rows.Count).End(xlUp).Row tekst...

    Software serwis   15 Mar 2013 18:01 Odpowiedzi: 5    Wyświetleń: 1998
  • Polecenia do makra plus inputBox

    Może jeszcze załącze cały kod. jaki jest w pliku z makrem który potrzebuje zmodyfikowac. [syntax=vbscript]Sub WyborPliku() ' ' WyborPliku Makro ' ' Klawisz skrótu: Ctrl+j ' Wybor okreslonego pliku na którym ma się wykonać makro Dim robWB As Workbook: Set robWB = ThisWorkbook Dim robWS...

    Programowanie Początkujący   29 Wrz 2017 21:04 Odpowiedzi: 1    Wyświetleń: 639
  • Excel - Excel 2013, blokowanie powtarzających się wartości.

    Podałem pomysł, a nie gotowe rozwiązanie, niemniej pasujący do obu. Jak *zlepić* komórki w jedno - zakałdając, że zaczynamy od pierwszego wiersza (oraz, że jakieś dane są już wpisane): dim max%, wiersz% max = Arkusz1.UsedRange.SpecialCells(xlCel... For wiersz=1...

    Software serwis   16 Wrz 2014 17:59 Odpowiedzi: 13    Wyświetleń: 3900
  • Excel VBA - Excel - makro służące do blokowania wklejania/kopiowania

    Tak i to na kilka sposobów. Najprostsze, byłoby zadeklarowanie zmiennej globalnej typu Boolean, warunkowe uruchomianie procedury i makro z inputbox'em zmieniające stan zmiennej.

    Software serwis   20 Lis 2014 08:08 Odpowiedzi: 5    Wyświetleń: 3888
  • Excel - Wyszukiwarka danych w Excel

    [syntax=vb]Sub wyszuk() Set bs = ActiveSheet.UsedRange.Offset(1) slowo = InputBox("Slowo do wyszukiwania", "Szukaj") If slowo <> "" Then For Each r In bs.Rows r.Hidden = r.EntireRow.Find(slowo) Is Nothing Next End If End Sub [/syntax] P.S. Jurowska?

    Software serwis   27 Sty 2016 17:00 Odpowiedzi: 6    Wyświetleń: 843
  • VBA excel Pojawiający się i znikający CommandButton

    Z góry uprzedzam że jestem kompletnym laikiem w VBA – brakuje mi podstaw. W pracy miałam do czynienie z arkuszem obliczeniowym napisanym x lat temu w VBA w excelu który musiałam przystosować do zmieniających się przepisów i norm. Sprawiło mi to wiele frajdy, ale było to – najpierw delikatne...

    Obsługa oprogramowania   19 Kwi 2020 11:52 Odpowiedzi: 12    Wyświetleń: 876
  • Excel VBA pobieranie danych z innego pliku excel o zmiennej nazwie

    Sposobów na otwarcie pliku w VBA jest wiele. Można użyć: [syntax=vbnet]Pthnm = ActiveWorkbook.Path Workbooks.Open Pthnm & "\TMP.xlsx"[/syntax] a nazwę pliku podać przez InputBox lub pobrać z jakiejś komórki w arkuszu. Inny sposób to użycie FileDialog i wybranie pliku przy jego pomocy. Wybór należy...

    Programowanie Początkujący   24 Kwi 2022 22:09 Odpowiedzi: 11    Wyświetleń: 1122
  • Excel- automatyczne kopiowanie większej zawartości pól

    Usiadłem (wreszcie) nad tym i tak sobie myślę: Jeśli pierwszy dzień miesiąca wypada w środę, to w systemie 5/1 dzień wolny ma brygada, która pracowała w ostatni czwartek poprzedniego miesiąca. Nie ma tu stałych, więc po czym w takim razie biedny Excel ma się orientować? Systemu 6/2 nawet nie próbuję...

    Software serwis   30 Cze 2011 21:48 Odpowiedzi: 64    Wyświetleń: 13082
  • Arkusz kalkulacyjny excel na hasło

    W załączniku masz plik XLS z Excel-a 2003. Po zmianie arkusza, wyskakuje okienko do wprowadzenia hasła. Na wszystkie arkusze jest 12345. Po wpisaniu prawidłowego można pracować a arkuszem, po wpisaniu błędnego następuje przekierowanie na pierwszy arkusz, który może być arkuszem tytułowym z opisem obsługi...

    Software serwis   27 Lip 2011 22:00 Odpowiedzi: 14    Wyświetleń: 6362
  • Excel - makro , zastosowanie do wielu arkuszy.

    Witam, mam problem. Na jednej ze stron znalazłem makro które działa w jednym arkuszu. Chciałbym je zastosować do kilku jednakowych arkuszy, nie mam doświadczenia z makrami i dlatego proszę o poradę jak to zrobić. Z góry dziękuje. Option Explicit Dim Zakres As Range Private Sub Workbook_Open() ...

    Software serwis   14 Sty 2012 22:10 Odpowiedzi: 32    Wyświetleń: 8634
  • VBA Excel - Kopiowanie danych z innych plików do pliku zbiorczego-poprawa kodu

    Witam serdecznie Napisałem makro które kopiuje dane z wgranego pliku xls to arkusza zbiorczego. Jednak kod jest mało efektywny (kopiowanie trwa długo) oraz niekiedy nie kopiuje wszystkiego ;( Można jakoś poprawi kod aby działanie makra było szybsze? Z góry dzięki za pomoc [syntax=vb] Sub Wgrywanie_plików() Dim...

    Programowanie   22 Sty 2013 09:22 Odpowiedzi: 13    Wyświetleń: 11034
  • VBA Excel - Filtrowanie datą

    E2007PL, ustawienia systemowe "dd-mm-rrrr"> Trzeba podstawić datę w formacie US. Postać polecenia musi mieć formę (dla 1 do 2 listopada 2013)[syntax=text]ActiveSheet.ListObject... Field:=2, Criteria1:= _ ">=11/1/2013", Operator:=xlAnd, Criteria2:="<=11/2/2013"[/syntax]Nale...

    Programowanie Początkujący   10 Gru 2013 13:19 Odpowiedzi: 6    Wyświetleń: 4434
  • Excel VBA - Wstawienie Range() do Range()

    Sub NPV() ' ' ' stopa = InputBox("Podaj stopę.") Range("D2").Select ActiveCell.FormulaR1C1 = "=-R2C2+NPV(" & stopa & ", R2C3:RC3)" Range("D2").Select Selection.AutoFill Destination:=Range("D2:...

    Software serwis   02 Cze 2014 11:26 Odpowiedzi: 2    Wyświetleń: 1029
  • VBA / EXCEL - Przenoszenie danych + tworzenie etykiet

    Witam, Szukam rozwiązania na tworzenie prostych wydruków w Excelu. W zakładce Arkusz1 jest lista komponentów które przyjmujemy na magazyn. Codziennie dochodzą nowe pozycje. Do każdej musimy wydrukować drobna "etykietę" (zakładka Etykiety2, szare pola) Etykieta to tylko 3 komórki z Arkusza1...

    Programowanie Początkujący   07 Paź 2014 11:57 Odpowiedzi: 2    Wyświetleń: 1167
  • VBA Excel - Transpozycja tabeli (macierzy)

    Cześć, mam na warsztacie ostatnio temat związany z transpozycją tabeli. W tabeli w załączniku potrzebuję przepisać wartości kolumn od 0-9 (stałe - w sensie ilość się nie zmieni, bo po osiągnięciu każdej 9 licznik przeskakuje o kolejny wiersz) przyporządkowane do serii wierszy, do układu dwóch kolumn,...

    Programowanie   15 Cze 2015 19:44 Odpowiedzi: 14    Wyświetleń: 2844
  • VBA Excel - Kopiowanie wartości komórki do komentarza

    Witam, Potrzebuję funkcję w excelu, która kopiuje wartości z danego zakresu danych, a następnie tworzy komentarz w innej komórce i wkleja owe wartości do tej komórki. W internecie znalazłem taką funkcję: Sub CellToComment() Dim Rng As Range Dim WorkRng As Range On Error Resume Next xTitleId =...

    Programowanie   27 Cze 2015 13:46 Odpowiedzi: 12    Wyświetleń: 2520
  • Korespondencja seryjna z poziomu Excela

    Niestety nie mam programu Word 2007 lub nowszy, tylko Excel, zaskakująco ze Word dziala zastąpienie pliku bez żadnych pytan Dodano po 1 Sprobuj tak zamiast[syntax=vb]wd.ActiveDocument... lokaliz & txtFullname & ".docx"[/syntax] zrob [syntax=vb]nazwa = lokaliz & txtFullname...

    Programowanie   04 Kwi 2017 14:41 Odpowiedzi: 6    Wyświetleń: 1605
  • Excel - powtarzanie kilku wierszy na każdej stronie

    Odświeżam temat, ponieważ ma podobny problem a nie potrafię należycie wykorzystać żadnego z zamieszczonych plików. Potrzebuję, aby tabela mogła rosnąć w nieskończoność, jednak po wydruku na dole każdej strony musi zostać 3 wiersze dla kontroli dokumentów. Znalazłem taki kod VBA, jednak po wybraniu...

    Obsługa oprogramowania   08 Sty 2019 21:54 Odpowiedzi: 10    Wyświetleń: 4764
  • VBA Excel - Aktualizacja tabeli z pominieciem pustych pol

    Hej, Mam problem z excelem. Raz w miesiacu musze uzupelniac tabele ze szkoleniami jakie odbyli 200 osob 37 roznych szkolen. Dane dostaje w wersji Jan Kowalski szkolenia HR 20/01/2019 musze je przepisac do tabeli gdzie w kolumnie mam nazwe szkolen, a wiersze odpowiadaja danym pracownikom. Jestem...

    Obsługa oprogramowania   13 Lut 2019 09:58 Odpowiedzi: 2    Wyświetleń: 378
  • VBA Excel - Aktualizacja tabeli z pominieciem pustych pol

    Hej, Mam problem z excelem. Raz w miesiacu musze uzupelniac tabele ze szkoleniami jakie odbyli pracownicy w danym miesiacu- 200 osob 37 roznych szkolen. Dane dostaje w wersji Jan Kowalski szkolenia HR 20/01/2019 musze je przepisac do tabeli gdzie w kolumnie mam nazwe szkolen, a wiersze odpowiadaja...

    Programowanie Początkujący   16 Lut 2019 06:45 Odpowiedzi: 1    Wyświetleń: 351
  • [ACCESS + EXCEL] Zapytanie do bazy

    ominąć jawne podanie hasła Da się, zwykły InputBox przed skonstruowaniem zmiennej połączenia, ale będzie widoczne, gdyż InputBox (w standardowym użyciu) nie maskuje wpisów lub własna formatka z polem tekstowym z nałożoną maskownicą.

    Programowanie Początkujący   31 Sty 2020 08:31 Odpowiedzi: 14    Wyświetleń: 522
  • Excel - filtr listy, odhaczenie pozycji i zaznaczone w innym arkuszu

    A jaki sposób mogę "masowo" stworzyć chekboxa dla 1200 pozycji Możesz spróbować tak: zaznaczyć odpowiedni zakres w kolumnie dla checkboxów, a następnie uruchomić makro: [syntax=vbscript]Sub InsertCheckBoxes() Dim Rng As Range Dim WorkRng As Range Dim Ws As Worksheet On Error Resume Next xTitleId...

    Obsługa oprogramowania   20 Sty 2021 07:59 Odpowiedzi: 11    Wyświetleń: 513
  • Magicy od excela i VBA - wyzwanie

    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...

    Software serwis   12 Mar 2011 10:56 Odpowiedzi: 34    Wyświetleń: 7555
  • [Excel 2003 VBA] - proste zadanie...

    Witam! Mam wykonać takie coś: Wypełnić zaznaczony prostokątny zakres komórek arkusza liczbami losowymi z przedziału <100,1000>. Napisać makro, które nadaje zakresowi nazwę wprowadzaną przez użytkownika w oknie InputBox, oblicza sumę kwadratów liczb z tego zakresu i wyświetla wynik w oknie dialogowym...

    Programowanie   17 Kwi 2008 13:02 Odpowiedzi: 12    Wyświetleń: 7840
  • Excel-porównywanie liczb

    :arrow: marek003 Można wpleść coś takiego kol = Cells.Find(What:="Kod Wewnętrzny").Column i mamy numer kolumny w postaci liczby dla Cells :arrow: agentka83 Większość prostych makr "tworzymy" przez nagrywanie. Przykład: Musisz zamienić tekst A0012 na 0306 w kolumnie "F". 1....

    Software serwis   17 Cze 2009 19:55 Odpowiedzi: 12    Wyświetleń: 5546
  • Excel - formatowanie warunkowe

    Ta linia ostwiersz = .UsedRange.Rows.Count liczy ile zajmujesz wypełnionych wierszy. W załączonym pliku post wyżej masz wstawione 3 puste wiersze nad nagłówkiem tabelki i stąd problemy. Makro wiersz Nr 50 "widzi" jako 47... Jeśli musisz je tam mieć to wpisz dowolny tekst w dowolną komórkę każdego wiersza...

    Software serwis   01 Lip 2009 07:44 Odpowiedzi: 21    Wyświetleń: 5977
  • vb excel - program magazynowy pomoc

    Dodano po 4 Ad1 w nowym arkuszy kod poniżej działa!!! Private Sub CommandButton1_Click() Dim a a = InputBox("Podaj nazwę") For i = 1 To ThisWorkbook.Sheets.Count If Sheets(i).Name = "M-" & a Then MsgBox "Arkusz o takiej nazwie...

    Software serwis   04 Mar 2014 10:41 Odpowiedzi: 116    Wyświetleń: 27710
  • [Excel] VBA makro - problem

    Sub Marko4() Dim Osoby As Object ostatniWiersz = Range("I1").End(xl... = 2 nazwisko = InputBox ("Podaj nazwisko osoby do zliczenia punktów") For i = pierwszyWiersz To ostatniWiersz Set Osoby = Range("B"...

    Programowanie Początkujący   28 Paź 2009 00:58 Odpowiedzi: 21    Wyświetleń: 11011
  • Excel skrypt symulujący losowanie multilotka.

    For i = 1 To 10 wybrane(i) = InputBox("Podaj liczbę nr " & i & " z przedziału 1 - 80", i) If wybrane(i) = i Then MsgBox ("Liczba została już wybrana, wybierz inną.") End If If wybrane(i) > 80 Then MsgBox ("Podana liczba jest za duża, podaj inną.") i = i - 1 ElseIf...

    Software serwis   19 Sty 2010 19:21 Odpowiedzi: 10    Wyświetleń: 3611
  • [EXCEL][VBA] zmienna nazwa pliku

    Hmm. Ciekawe. To skorzystaj z inputa. np.: plik = InputBox("PODAJ ŚCIEŻKĘ DO PLIKU") lub tak jak chciałeś wcześniej z komórki.

    Programowanie Początkujący   13 Lut 2010 01:28 Odpowiedzi: 6    Wyświetleń: 10554
  • excel - kopiowanie wierszy i usuwanie diplikatów do arkusza

    Witam Czy ktoś miałby chwilkę i mógłby mi pomóc? (może być makro lub jeśli się da to funkcje z arkuszem pomocniczym). Mam problem z kopiowaniem wierszy i ich dublowaniem do gotowego arkusza. Mam skoroszyt, który zawiera 3 arkusze robocze: "Re_1", "Re_2" , "Re_3" oraz arkusz wynikowy "Wynik". Do...

    Software serwis   08 Maj 2010 11:41 Odpowiedzi: 4    Wyświetleń: 5230
  • VBA excel problem z warunkami

    p = InputBox("Podaj kapitał początkowy:") If IsNumeric(p) = False Then MsgBox "Zle dane" End If Nie wiem czy dobrze napisałem ale nie działa

    Software serwis   18 Maj 2010 21:03 Odpowiedzi: 10    Wyświetleń: 2561
  • [VBA][Excel] Analiza zapisów partii szachowych

    Witam. Udało mi się stworzyć część analizującą dane. Na razie na pewno zawiera jeszcze dużo błędów. Roboczo dodałem pytanie o ilość analizowanych debiutów ponieważ strasznie długo to trwa. Analiza wszystkich pewnie potrwała by koło godziny. Proszę o dalsze sugestie, poprawki. Oto kod: Option Explicit Private...

    Programowanie   14 Cze 2010 18:16 Odpowiedzi: 28    Wyświetleń: 5229
  • [VBA Excel] Jak wybrać zakres danych do makra?

    To jest to makro: Sub DataLabelsFromRange() Dim DLRange As Range Dim Cht As Chart Dim i As Integer, Pts As Integer ' Określenie wykres Set Cht = ActiveSheet.ChartObjects(1).Char... ' *********** Wyświetlenie pytania o zakres On Error Resume Next ...

    Programowanie   09 Wrz 2010 07:56 Odpowiedzi: 12    Wyświetleń: 9645
  • Excel - pole wyboru i kilka możliwych odpowiedzi

    Najprościej byłoby użyć zwykłe InputBox. Bardziej "eleganckie" rozwiązanie z formularzem w załączniku.

    Programowanie   21 Sie 2010 20:39 Odpowiedzi: 9    Wyświetleń: 5280
  • Excel - działanie w zaznaczonym obszarze

    Najprościej zastosować Inputbox. x = InputBox("Podaj Nr wiersza", "Inputbox1") y = InputBox("Podaj Nr kolumny", "Inputbox2")

    Software serwis   16 Wrz 2010 09:21 Odpowiedzi: 9    Wyświetleń: 1848
  • VBA Excel - makro z zapytaniem do użytkownika

    Chciałbym żeby makro zapytało mnie Zależnie od tego w którym momencie masz do wyboru obsługę zdarzeń arkusza: Activate Change SelectionChange Nazwy mówią same za siebie :D najlepiej w formie wyskakującego okienka Tu najprostszym rozwiązaniem jest InputBox() W przypadku...

    Programowanie   09 Lis 2010 20:58 Odpowiedzi: 6    Wyświetleń: 3016
  • Excel jak zablokować wiersz po wpisaniu danych.

    Czy można je blokować do edycji po wpisaniu danych lub odblokować jeżeli zajdzie taka potrzeba. Z tym pierwszym to żaden problem, wystarczy wykorzystać zdarzenie Worksheet_Change . Natomiast jak chcesz zrealizować odblokowanie? CheckBox w każdym wierszu? Trochę proszenie się o kłopoty. Chyba, że wszyscy...

    Software serwis   10 Gru 2010 07:15 Odpowiedzi: 6    Wyświetleń: 6382
  • Excel - sumowanie cyfr. Jak obliczyć sumę cyfr w komórce?

    Jeżeli chodzi o sumowanie cyfr w liczbie to zostaje tylko makro, moge troszkę podpowiedzieć: Sub main() Dim c, x As Integer x = InputBox("") While x <> 0 c = c + x Mod 10 x = x \ 10 Wend MsgBox(c) End Sub

    Software serwis   13 Gru 2010 13:56 Odpowiedzi: 10    Wyświetleń: 18979
  • Excel data w kolejnym arkuszu w tej samej komórce

    Nie pisałeś wcześniej, że będziesz latał z datą po arkuszu jak "przedstawiciel mniejszości narodowej po pustym sklepie. Użyj drugiej procedury z mojego postu. Do uzupełnienia daty możesz wykorzystać którąkolwiek komórkę arkusza wpisując do niej to co jest w cudzysłowie. Można też wykorzystać InputBox. Tak...

    Software serwis   14 Lut 2011 19:42 Odpowiedzi: 26    Wyświetleń: 3150
  • Funkcja VBA w Excelu nie działa przy przełączaniu arkuszy

    Mam jeden arkusz który ma działać przy uruchomieniu i następnie po uruchomieniu, wygląda to tak: 'to jest działanie po uruchomieniu Private Sub Worksheet_Change(ByVal Target As Range) Dim Symbole Application.EnableEvents = False With Target Symbole = UCase(.Value) Select Case...

    Programowanie Początkujący   28 Sty 2011 17:50 Odpowiedzi: 4    Wyświetleń: 2668
  • Excel - odkrywanie kolumn tylko przez wybranych użytkowników

    Witam ponownie. Jak to zwykle bywa, plany sobie a życie sobie. Narobiłem się jak dziki osioł a pod koniec, gdy doszło do haseł, dowiedziałem się że oprócz naszej (nocnej zmiany) ten skoroszyt jest edytowany jeszcze przez rzeszę ludzi z dniówki. A w związku z tym zakładanie haseł na poszczególne osoby...

    Programowanie Początkujący   01 Mar 2011 18:42 Odpowiedzi: 19    Wyświetleń: 13651
  • Automatyczny wydruk stron z dodaniem numeru - Excel.

    Witaj, Można napisać proste makro, które: - wczyta ilość stron do wydruku (z komórki poza drukowanym arkuszem, albo inputbox z klawiatury) - powtórzy się zadaną parametrem uzyskanym wcześniej ilość razy wykonując dokładnie dwie rzeczy - inkrementację numeru oraz szybki wydruk na domyślną drukarkę...

    Software serwis   04 Lip 2011 12:02 Odpowiedzi: 3    Wyświetleń: 2208
  • Excel, Makro - ścieżki do plików

    Rozdziel ścieżkę i nazwy plików. Argumentem metody Open jest string, więc możesz podstawić ze zmiennych. Np Workbooks.Open sciezka & "\" & plik Gdzie wartość dla "sciezka" pobierana jest z komórki, inputbox'a, browsera, etc.

    Programowanie   12 Sie 2011 14:02 Odpowiedzi: 7    Wyświetleń: 7859
  • Jak to zrobić - Vba Excel?

    Skleciłem taki kod. Sub wyszukaj() Dim tekst As String Dim dana As String Dim w As Integer Set ark1 = Sheets("dane") For i = w To ark1.Range("a65536").E... = 1 Do While j < 2 On Error GoTo koniec Cells.Find(What:=w,...

    Programowanie Początkujący   31 Sie 2011 13:31 Odpowiedzi: 30    Wyświetleń: 5624
  • vba excel - kopiuj i drukuj

    Znalazłem i przerobiłem coś takiego: [syntax=vb] Sub Kopiuj_Do() a = Val(InputBox("Soort numer")) Cells.Select Selection.ClearC... = 2 x = 1 Worksheets("Blad2").Cells(1, 1).Value = "Baan" Worksheets("Blad2").Cells(1, 2).Value = "Pos" Worksheets("Blad2").Cells(1,...

    Programowanie   29 Gru 2011 09:44 Odpowiedzi: 7    Wyświetleń: 2050
  • vba excel - kopiowanie do istniejacej listy

    Mam taki kod i teraz nie wiem jak mam go zmienić żeby kopiowało mi dane ale nie usuwało tych które już były wcześniej skopiowane. Kod ma dodawać już do istniejącej listy. Może mi ktoś pomoc? [syntax=vb] Sub Kopiuj() a = Val(InputBox("Soort numer")) Cells.Select Selection.ClearC... = 2 x...

    Programowanie   30 Gru 2011 07:30 Odpowiedzi: 4    Wyświetleń: 1213
  • VBA EXCEL Filtrowanie na podstawie zakresu daty

    Troche niejasno to opisałem Problem nie polega na formacie daty i samej konstrukcji inputbox'a. Nie wiem jak zapisać kod filtrowania po dacie, mając dwie zmienne data1 i data2 Chciałbym otrzymać taki sam efekt jak po rozwinięciu przysiku filtrowania w pierwszym wierszu i wyborze okreslonego zakresu ...

    Programowanie Początkujący   26 Lut 2012 17:05 Odpowiedzi: 4    Wyświetleń: 5745
  • EXCEL VBA - Kopiowanie danych ze starego pliku do nowo utworzonego

    1. Edit: Do otwarcia pliku za pomocą dialogu można użyć [syntax=vb]Plik = Application.GetOpenFilename(FileFilter, FilterIndex, Title, ButtonText, MultiSelect)[/syntax]

    Programowanie Początkujący   29 Lut 2012 09:08 Odpowiedzi: 7    Wyświetleń: 2654
  • Excel VBA-łączeni zapisów

    Naciskając przycisk CANCEL chciałbym aby on nie wymazywał zapisu w Msg Box a jedynie opuszczał komórkę i nie przechodził do następnego Msg Box-a Niestety inputbox już taki jest że nie da się w nim "przechwycić" Cancel Po naciśnięciu Cancel "funkcja inputbox" zwraca pusty ciąg czyli "" Ostatecznie...

    Software serwis   17 Kwi 2012 04:50 Odpowiedzi: 40    Wyświetleń: 3574
  • Excel Visual Basic - Zaawansowany Formularz

    UserForm1 Wartość/Szanse na powodzenie: W polu wartość wpisywana jest kwota - jak zrobić, żeby po wpisaniu liczby, automatycznie formatowałaby się ona 0000,00 ZL? W przypadku pola Szanse na powodzenie - liczba automatycznie formatowana do procentów. Komentarz: Czy można wprowadzić automatyczne...

    Programowanie Początkujący   10 Maj 2012 11:38 Odpowiedzi: 2    Wyświetleń: 1595
  • Excel - Pobieranie danych z dwóch plików i porównanie zmian w %

    Witam, mam jeszcze jedno pytanie co do tego tematu. Otóż zmieniła się jedna rzecz. Mianowicie, Kolumna w plikach PlikA i PlikB okazuje się, że nie jest stała i ta sama. W każdym pliku i w każdym arkuszu kolumna, z której ilość powinna być pobierana jest inna, ale można ją rozróżnić po nagłówku. Nagłówek...

    Software serwis   03 Lip 2012 07:34 Odpowiedzi: 6    Wyświetleń: 2767
  • [EXCEL][VBA] Makro wklejające seryjnie zdjęcia z textboxem

    Witam forumowiczów. Napotkałem pewien problem z makrem, które wkleja mi zdjęcia jedno po drugim, a następnie na wysokości każdego wklejonego zdjęcia umieszcza textbox'a z tytułem pliku. Już myślałem, że wszystko jest ok i nawet makro ruszało z folderu testowego i tu nagle zonk.. Nie bardzo wiem, czemu...

    Programowanie   05 Lip 2012 14:06 Odpowiedzi: 2    Wyświetleń: 1668
  • EXCEL - Po kliknięciu na komórkę pojawia się wyskakująca tabelka - jak?

    Ciekawy pomysł :) Realizacja nie będzie raczej łatwa. Nie będę zanudzać formularzami użytkownika, więc od razu zapytam: A co z tymi nazwiskami po uzupełnieniu tabelki? Może skupić się na miejscu docelowym (InputBox, Split)?

    Programowanie   25 Lip 2012 11:45 Odpowiedzi: 4    Wyświetleń: 2290
  • Excel - Pierwsza komórka z wpisana wartością

    Obecnie przedstawię poczynione przeze mnie próby. Na marginesie - wydaje mi się , że marek033 oraz adams_nt są na urlopie (i to całkiem słusznie) W przedstawionej tabeli w komórkach znajdują się formuły (= = jeżeli( - co prawda komórki w tabeli mam puste (w których miesiącach nie wpłacono) - ale...

    Software serwis   13 Sie 2012 19:16 Odpowiedzi: 10    Wyświetleń: 1982
  • Excel - makro kopiujące kolumnę z pominięciem pustch komórek do nowego pliku

    podłączę sie pod temat bo mam podobny roblem ;/ potrzebuje makro ktore kopiowaloby komorki z kolumny z bazowego pliku do nowego skoroszytu ale co ktoras komorke (przesuniecie 'r' docelowo podawane z inputbox'a) mam cos takiego: [syntax=vb]Sub zot() Dim wrs As Integer, r As Integer r = 10 Set newWkb...

    Software serwis   22 Sie 2012 17:02 Odpowiedzi: 22    Wyświetleń: 10435
  • Excel - Wyszukiwanie pustych wartości w zbiorze

    W tym przypadku trzeba sprawdzać po kolei. String dla porównania należałoby składać z litery (A-Z, wg. potrzeb, lub z InputBox'ów) i liczby (1-999), wypełniając zerami do długości 4 znaków. Dwie zagnieżdżone pętle For i metoda Range(zakres).Find(argumenty) . Jeżeli wyszukiwanie zakończy się błędem...

    Software serwis   02 Wrz 2012 12:31 Odpowiedzi: 13    Wyświetleń: 3906
  • excel - Obliczanie ilości zmian z dat

    Proste rozwiązania są najlepsze :0 Dzięki wielkie Jak to już mam to znowu kolejny etap. Potrzebuje Rekord gdzie liczba zmian jest większa niż 1 skopiować na sam dół arkusza pod dane. Próbowałem sklecić jakiś kod ale mi nie wychodzi. Co jest nie tak? Sub Przycisk19_Kliknięcie() Dim...

    Programowanie Początkujący   08 Paź 2012 22:15 Odpowiedzi: 10    Wyświetleń: 1713
  • Excel vba - wyszukanie i kopiowanie wierszy do arkusza vba

    W takim przypadku potrzebne są dwie pętle. Pierwsza For dla wszystkich arkuszy, których nazwa <>"RAPORT", wewnętrzna Do While...Loop z licznikiem dla Nr wiersza i instrukcją porównująca zawartość komórki, Np: If Instr(Cells(wiersz, 5).text, szukany_fragment)>0 Then i tu kopiowanie. Szukaną...

    Programowanie   12 Lis 2012 08:12 Odpowiedzi: 12    Wyświetleń: 8529
  • Excel-VBA - ComboBox-lista

    Na pierwszym arkuszu umieszczamy listę Combo. Żeby wyświetlić listę arkuszy można to zrobić w makro, które ładuje listę Combo przy otwarciu skoroszytu, w obsłudze zdarzenia Workbook_Open: [syntax=vb] Option Explicit Private Sub Workbook_Open() Dim iWiersz As Integer Dim ws As Worksheet iWiersz...

    Programowanie Początkujący   06 Lis 2012 13:17 Odpowiedzi: 2    Wyświetleń: 3711
  • Excel - kreator grafiku pracy

    hmm, nie za bardzo o to chodziło, ale dzięki za odpowiedz. zmiany pracują w systemie i rzadko dwa lata z rzędu wypadają tak samo :( ja zrobilem cos takiego lopatologia ale dziala czy ktos jest w stanie doradzic co do kodu? [syntax=vb]Option Explicit Sub dniowki() With Selection ...

    Software serwis   04 Sty 2016 19:57 Odpowiedzi: 3    Wyświetleń: 14640
  • Excel VBa - jak sprawdzić podzielność?

    Widzę, że nie jest to kwestia pojedynczego błędu. Nie wiem z czego to wynika, ale kompletnie nie akceptujesz zasad języka. Nie można być tak upartym. W przypadku tej procedury do zmiennej Target przypisywany jest obiekt typu Range (zakres) ze wszystkimi własnościami. Range.Address jest identyczny...

    Programowanie Początkujący   10 Maj 2013 09:00 Odpowiedzi: 4    Wyświetleń: 4821
  • Excel - listy rozwijane, filtr -

    Przepraszam, ale co to jest? (zaznaczone na żółto) sprawdź to: [syntax=vb]Sub filtr_listy() szukana = InputBox("Wpisz ciąg znaków którego szukasz") Selection.AutoFilter Field:=1, Criteria1:="=*" & szukana & "*", Operator:=xlAnd End Sub[/syntax]

    Software serwis   24 Maj 2013 23:33 Odpowiedzi: 17    Wyświetleń: 6981
  • VBA MAKRO - Proste makro Excel

    Skoro ma być w VBA... Przykład z tablicą i... InputBox'em ;) [syntax=vb]Sub aver() tekst = InputBox("Wpisz liczby oddzielając średnikiem", "Obliczanie średniej") tekst = Replace(tekst, " ", "") 'wyrzucamy spacje tekst = Replace(tekst, ":", ";") 'mogło się komuś omsknąć tekst = Replace(tekst,...

    Programowanie Początkujący   30 Maj 2013 20:30 Odpowiedzi: 2    Wyświetleń: 2799
  • Excel - Sumowanie z wielu plików

    Najprościej: 1. Dołożyć pętlę z "gumką myszką" 2. Potraktować Offsetem z InputBox'a 2a. Jeśli zakres źródłowy jest ciągły, zamiast Array też można podstawić InputBox i w pkt.2 pytać o przesunięcie, a nie Nr kolumny (nie uwzględniłem w przykładzie) [syntax=vb]Sub Makro2() MyPath = "C:\magazyn\" myname...

    Software serwis   10 Wrz 2015 07:56 Odpowiedzi: 18    Wyświetleń: 7575
  • Excel. wstawianie do komórek -

    Zamiast Range("A1") można użyć komórki zaznaczonej (Selection), a po wpisaniu danych przesunąć zaznaczenie np. Selection.Offset(1,0).Select. Jest to oczywiście tylko jedna z możliwości. Przykład załączony, ale trzeba go dopasować, ja użyłem funkcji InputBox, bo podany fragment kodu jest wyrwany z kontekstu.

    Software serwis   11 Lip 2013 12:56 Odpowiedzi: 1    Wyświetleń: 1041
  • EXCEL VBA - sortowanie scalonych komórek

    Mniej efektywnie, za to prościej ;) [syntax=vb]Sub SortE() Dim wrsOst As Long Dim rw As Long Dim lista() As Variant Dim poz As Integer Dim i As Long, j As Long Dim ile As Integer Dim Temp As String Dim knyps As Integer wrsOst = Range("E1").End(xlDown).Row rw = wrsOst + 1 poz = 1 'zapisujemy...

    Programowanie Początkujący   13 Wrz 2013 12:54 Odpowiedzi: 10    Wyświetleń: 6333
  • [Excel 2007] - makro do pobierania danych z innych plików *.xlsx

    Potrzebna byłaby formuła oparta o ADR.POŚR, ale tu znowu zbyt wiele niewiadomych. Jeśli makro, mogłoby być coś podobnego do[syntax=vb]Sub Wkb_From_SubDirs() Dim path1 As String, path2 As String Dim plik As String, tekst As String Dim i As Long, folder As Object, pfolder As Object 'jeśli ktoś wpisze...

    Software serwis   11 Cze 2016 19:47 Odpowiedzi: 17    Wyświetleń: 14259
  • Excel - pobieranie danych z innych plików.

    Witam, przygotowuję makro, które kopiuje określone wiersze z wielu plików xls i zapisuje je do jednego arkusza tworząc swojego rodzaju bazę. Niestety nie jestem zbyt zaawansowana jeśli chodzi o VBA, wiec moja metoda jest dość chałupnicza:( najpierw podaję nazwę pliku Excel go otwiera ale problem...

    Software serwis   06 Gru 2013 10:05 Odpowiedzi: 5    Wyświetleń: 5530
  • Excel VBA - kod w którym liczba pętli zależy od podanej przez użytkownika liczby

    W ostateczności (syntax wybierz: Visual Basic) [syntax=vb]For i = 0 To InputBox("wpisz liczbę")[/syntax] lub podstaw z komórki (po wymnożeniu *10, jeśli step 0.1)

    Software serwis   11 Gru 2013 07:14 Odpowiedzi: 4    Wyświetleń: 1248
  • zamiana liczby na slowo excel

    Potrzebuje programu na zmiane liczby na slowo w vba. Wiem zarowno w necie jak i u was na forum byly podobne watki z zamiana kwoty na slowo, ale chodzilo o to zeby nie bylo wlasnie tego zloty/grosz a dodatkowo ma byc to procedura a nie funkcja. Mam cos takiego jak ponizej. Kod dziala jednak jest...

    Software serwis   17 Mar 2014 23:22 Odpowiedzi: 2    Wyświetleń: 1707
  • Makro - Dane z EXCELa do WORDa -

    Witam wszystkich forumowiczow, z gory przepraszam za brak poslkich znakow (zycie zmusilo do emigracji). Widzialem ze skutecznie pomogliscie juz wielu osobom w stworzeniu praktycznych i przede wszystkim poprawnie dzialajacych makr. Ja, jak kazda z tych osob rowniez z powodu swoich ogranicen w tej...

    Programowanie Początkujący   03 Sie 2018 13:46 Odpowiedzi: 30    Wyświetleń: 13089
  • Excel - Wyszukiwanie danych z ostatnich 3 dni

    Tak jak już napisał Maciej Gonet bez załącznika to trochę wróżenie z fusów, ale spróbuj dostosować do Twojego pliku taki kod: [syntax=vb]Sub TrzyOstatnieDni() Dim rRng As Range Dim lLstRw& Dim sData$ Dim dData As Date sData = InputBox("Podaj Datę w formacie dd/mm/rrrr):") sData = Format(sData,...

    Software serwis   15 Mar 2014 20:32 Odpowiedzi: 5    Wyświetleń: 996
  • VBA Auto-filtr w Excelu definiowany z UserForm

    Troche pozmienialam koncept i kod wyglada nastepujaco: [syntax=vb]Sub filt() Dim sh As Worksheet, init As String Set sh = ActiveSheet init = InputBox("Enter the initials to find.", "SEARCH CRITERIA") If init = "" Then MsgBox "Invalid Entry" Exit Sub End If sh.AutoFilterMode...

    Programowanie Początkujący   24 Mar 2014 19:57 Odpowiedzi: 4    Wyświetleń: 2205
  • makro - excel vba stworzenie makra

    Witaj Dim scieki, scieki_oczyszczone, scieki_nieoczyszczone As String - dziwne, dlaczego dane liczbowe przedstawiają jako tekst Makro sama nie mogę odgadnąć, w jakie komórki wprowadzona wartość. Należy określić, gdzie to zrobić. Można nadal używać pola wprowadzania WBA. [syntax=vb] scieki_oczyszczone=.....

    Programowanie Początkujący   18 Maj 2014 12:47 Odpowiedzi: 7    Wyświetleń: 1131
  • Wstawianie kolumny w określonym miejscu w excelu w kodzie vba

    Mam jeszcze jeden problem. Wasze podpowiedzi były super i dzieki, ale jak zrobic by po dodaniu juz kolumny w odpowiednim miejscu na podstawie podanej daty excel wstawiał w tej kolumnie w wierszu 2 formułę sumujaca dla tej kolumny wartosci od wiersza 4 do 3000. poniżej podaje pracujacy juz kod [syntax=vb]Private...

    Programowanie Początkujący   08 Paź 2015 17:45 Odpowiedzi: 14    Wyświetleń: 3105
  • Excel - VBA - wprowadzanie danych dodatkowym arkuszem

    tylko że nie mam pojęcia większego o VBA i nie wiem jak zrobić lub jakiego hasła poszukać dla wyboru lub dodawania arkusza pytanie czy makro z openoffica zadziała: Sub WstawNazwanyArkusz() Dim Nazwa As Variant Nazwa = InputBox("Wpisz nazwę dla nowego arkusza:", "Nazwa nowego arkusza") If Nazwa = ""...

    Software serwis   26 Lip 2014 08:33 Odpowiedzi: 7    Wyświetleń: 2352
  • VBA EXCEL userform a msgbox -

    Panowie jeżeli to możliwe proszę o pomoc w podpięciu pętli do userform. Jeżeli w pętli używam msgboxa i przycisków TAK i NIE /TAK-szukaj dalej, NIE-przerwij szukanie/ to wszystko jest ok. Stworzony userform ma zastąpić msgboxa. Problem polega na tym, że nie wiem jak zatrzymać wyszukiwanie po uruchomieniu...

    Programowanie Początkujący   03 Paź 2014 15:36 Odpowiedzi: 8    Wyświetleń: 2076
  • Excel kopiowanie z wyborem arkusza

    Z MsgBox można wybrać tylko Tak, Nie lub Anulować. Możliwość wprowadzenia jest w InputBox, ale trzeba wprowadzać ręcznie, możliwy błąd. Z RefEdìt można określić kursorem arkusza i komórki docelowej.

    Software serwis   19 Paź 2014 18:01 Odpowiedzi: 30    Wyświetleń: 2139
  • vba - Hiperłącze w vba excel

    Według mnie, a mogę się mylić, nieprawidłowo używasz argumentu. 'SubAdres' musi być String, nie może reprezentować obiektu. Pod adres podstawiasz:"C:\Documents and Settings\slawomir.kozak\Pulpit\gnom.xls"... SubAdres powinno być Np: "Arkusz1!A1" z InputBox'a (rng as String) rng = Application.InputBox(prompt:=&qu...

    Programowanie Początkujący   19 Lis 2014 15:11 Odpowiedzi: 2    Wyświetleń: 1380
  • Excel VBA - wyszukiwanie wartości - makro

    Witam. Mam prośbę odnośnie stworzenia makro. W arkuszu "dane" potrzebuje wyszukać wartości powyżej 9 i poniżej -9 w kolumnie "cena". Tych kolumn "cena" jest kilka w arkuszu "dane". Gdy znajdzie takie wartości zaznaczy je kolorem na czerwono i wytnie cały wiersz i przeniesie na początek kolumny. Nie...

    Software serwis   28 Lis 2014 15:33 Odpowiedzi: 10    Wyświetleń: 2661
  • excel vba - makro vba lastRow

    Mam pewien problem z lastRow. Napisałem poniższe makro do przeszukiwania wszystkich arkuszy w celu znalezienia "szukanej". W każdym arkuszu makro szuka od wiersza 7 do lastRow. I tu mam problem taki, że jak w Sht 1 lastRow = 7 ,a w Sht 2 lastRow =2 i załączę makro w Sht 2 to makro przeszukuje mi także...

    Programowanie   17 Gru 2014 09:29 Odpowiedzi: 1    Wyświetleń: 1038
  • Excel, makro - kopiowanie wielozakresowe

    Witam mam mały problem z makrem, a mianowicie chciałbym żeby to makro kopiowało tylko wartości komórek, a nie całe komórki nawet z ramką i kolorem czcionki, da się je jakoś przerobić.[syntax=vb]Option Explicit Sub CopyMultipleSelection() Dim SelAreas() As Range Dim PasteRange As Range ...

    Software serwis   02 Lut 2015 17:47 Odpowiedzi: 3    Wyświetleń: 810
  • VBA Excel, makro wyszukanie nr kolumny z określoną wartością

    Zrobiłem coś takiego i śmiga: Sub Wkleja_dane Dim akt_wiersz As Long Numer_prac = InputBox("Podaj numer karty") Windows("XXX.xlsx").Activ... Sheets("XXX").Select Columns("A:A... Set cell = Selection.Find(What:=Numer_prac, After:=ActiveCell, LookIn:=xlFormulas, _ ...

    Software serwis   18 Mar 2015 11:12 Odpowiedzi: 2    Wyświetleń: 2313
  • Excel - Makro zapisujące plik pod określoną nazwą oraz z możliwością podania

    Witam, usiłuję przerobić makro zapisujące plik pod określoną nazwą na dwa inne makra, które: 1. zapisuje plik pod określoną z góry nazwą, 2. zapisuje plik pod predefiniowaną nazwą (część jest ustalona, resztę wprowadza się w wyskakujące okienko). Oto kod, który usiłuję przerobić: [syntax=vb] Sub...

    Software serwis   09 Kwi 2015 20:39 Odpowiedzi: 6    Wyświetleń: 4317
  • VBA Excel - kopiowanie danych do innego arkusza

    Witam, początkująca jestem więc może dlatego nie mogę przejść wydawałoby się prostej sprawy z makrem. W arkuszu "plan" mam dane zaczynające się zawsze od dnia bieżącego. Chcę kopiować codziennie wskazany zakres do arkusza "konsolidacja danych" w zależności od daty. Wskazuję szukaną datę w "konsolidacji...

    Programowanie Początkujący   26 Kwi 2017 22:31 Odpowiedzi: 8    Wyświetleń: 6315
  • [VBA Excel] - Makro do kopiowania ilościowych danych pod 2 warunkami

    Spróbuj to [syntax=vb] Sub Porzadkuj() x = InputBox("Podaj datu", "Data przyporziadkowania", Date) If Not IsDate(x) Then Exit Sub x = DateValue(x) Dim nazwy As Range, d As Range With Sheets("pivot") Set nazwy = .Rows(3) Set d = .Cells.Find(x, LookIn:=xlValues) If d Is Nothing Then...

    Software serwis   18 Maj 2015 20:49 Odpowiedzi: 2    Wyświetleń: 939
  • Excel VBA - Makro kopiujące komórki z wybranego wiersza

    Witaj [syntax=vb]Sub kopije() r = Val(Trim(InputBox("Podaj numer wiersza do skopiowania"))) If r = 0 Then Exit Sub Sheets(1).Range("A" & r & ", B" & r & ",D" & r & ",G" & r).Copy Sheets(2).Range("A1") End Sub [/syntax]

    Software serwis   21 Maj 2015 09:26 Odpowiedzi: 2    Wyświetleń: 1524
  • Excel makro do kopiowania kilku zakladek do jednej

    A może chodzi o coś takiego: [syntax=vb] Option Explicit Sub Posklejaj_Klik() Dim i As Long Dim Wprowadzone As String Dim IloscArkuszy As Long Dim OstWierszArkusz1 As Long IloscArkuszy = ThisWorkbook.Sheets.Count Do While Not IsNumeric(Wprowadzone) ...

    Software serwis   21 Maj 2015 11:39 Odpowiedzi: 2    Wyświetleń: 987
  • makro VBO EXCEL wyszukiwanie nazwisk w kolumnie

    Witam Mam takie makro. W kolumnie A w arkuszu są wpisane nazwiska . 1-Zadaniem makra jest wyszukanie wszystkich takich samych nazwisk i wyświetlenie ich . 2-jeśli jest pusty wiersz w kolumnie ; to ma przejść do następnego z nazwiskiem 3- jeśli są trzy kolejne puste komórki to makro ma się zakończyć...

    Software serwis   14 Lis 2015 15:08 Odpowiedzi: 5    Wyświetleń: 1590
  • [excel][vba] Kopiowanie wierszy jezeli okreslona wartosc

    [syntax=vbscript]Sub ZnajdzDodaj() Set a1 = Sheets("Arkusz1") Set a2 = Sheets("Arkusz2") a = InputBox("Znajdź :", "Szukanie") owa2 = a2.Cells(Rows.Count, "A").End(xlUp).Row If Application.CountIf(a2.Range("A1:A" & owa2), a) > 0 Then MsgBox a & " istnieje już w bazie." Exit Sub End If owa1...

    Programowanie Początkujący   10 Gru 2015 09:16 Odpowiedzi: 10    Wyświetleń: 3186
  • Excel VBA - Wyłączenie chrony udostępnionego arkusza z poziomu VBA

    Kurcze, jeżeli chodzi o VBA to jestem zaczynającym samoukiem. Nie znam reguł stosowania wszystkich funkcji. Mogę prosić Cię o rzucenie okiem na mój kod i poradzenie w jaki sposób użyć Twojej funkcji? [syntax=vbscript] Private a As Integer 'zmienna globalna Private haslo As String Sub MsgBox_error1()...

    Programowanie   22 Lut 2016 09:45 Odpowiedzi: 8    Wyświetleń: 6366
  • Excel VBA makro - Scalanie plików

    Prace nad kodem makra posunęły się naprzód :D . W chwili obecnej jest już gotowe wpisywanie ścieżki dostępu i wpisywanie zakresu danych do kopiowania. Pozostaje jeszcze problem, że musze wpisywać zakres danych do kopiowania dla każdego pliku osobno (zakres danych do kopiowania mam taki sam we wszystkich...

    Programowanie Początkujący   02 Maj 2016 13:24 Odpowiedzi: 7    Wyświetleń: 2259
  • nazwa arkusza w excellu - zmiana dowolnej nazwy arkusza w excelu

    Zmieniaj przy otwarciu (Workbook_Open) pliku. Jeśli nazwa "z głowy", to wykorzystaj InputBox.

    Programowanie Początkujący   09 Maj 2016 06:21 Odpowiedzi: 5    Wyświetleń: 2106
  • Excel - Przycisk z wstawieniem komentarza

    Co prawda zrobiłem macro i wstawia ono komentarz ale to jest już "gotowy" komentarz z tekstem albo pusty, a chciałbym żeby po naciśnięciu przycisku można było wpisywać komentarz. Możesz też wykorzystać inputbox [syntax=vbnet]ActiveCell.Add... Text:="Bob:" & Chr(10)...

    Software serwis   29 Wrz 2016 06:25 Odpowiedzi: 3    Wyświetleń: 585
  • Excel VBA Przeszukiwanie kolumn X,Y za pomocą SUMA WARUNKÓW wtedy suma kolumny Z

    Witam. Męczę się już od dłuższego czasu nad tym zagadnieniem w VBA. Jeśli chodzi o formuły excel itd. mam wszystko zrobione. (Wrzucam do wglądu) Ale wolałbym aby to było zrobione za pomocą makro ze względu na to że codziennie przy nowym gatunku muszę ręcznie zmieniać formułę grubości z 2 na 3 lub...

    Programowanie Początkujący   23 Lut 2018 11:57 Odpowiedzi: 3    Wyświetleń: 1422
  • [VBA Excel] Wyszukiwanie rekordu przy 2 zmiennych

    np: [syntax=vba]Option Explicit Sub bbb() Dim w As Long Sheets("Historia_ZLEC").Select On Error Resume Next w = Columns(4).Find(What:="kierowca", LookAt:=xlWhole).Row On Error GoTo 0 If w = 0 Then MsgBox "Nie znaleziono", vbOKOnly, "Uwaga": Exit Sub If Cells(w, 6).Value...

    Programowanie Początkujący   06 Maj 2018 11:10 Odpowiedzi: 5    Wyświetleń: 1059
  • podwójna instrukcja if w vba Excel + inputboxes

    Witam Szybko ograniczymy inputboxa do samych liczb używając [syntax=vbscript]p1 = Application.InputBox("Liczba 1", , , , , , , 1) p2 = Application.InputBox("Liczba 2", , , , , , , 1)[/syntax]

    Programowanie Początkujący   02 Cze 2018 11:01 Odpowiedzi: 4    Wyświetleń: 474
  • VBA, Excel - rejestr danych

    Czyta wartość z InBox-a i wpisuje ją w pierwszą wolną komórkę w kol. A. [syntax=vbscript]Sub Test() Dim arkusz As Worksheet Set arkusz = ActiveSheet Dim wartosc As Variant wartosc = InputBox("Wprowadź wartość") For Each komorka In arkusz.Columns(1).Cells If...

    Programowanie   23 Sie 2018 21:41 Odpowiedzi: 3    Wyświetleń: 366
  • Excel pomoc w utworzeniu makra - Makro kopiujące pewną komórkę i wklejające go w

    Temat do zamknięcia. Poradziłem sobie sam. Chodziło mi dokładnie o takie coś: Dodano po 2 [syntax=vbscript]Sub Makro1() ' ' Makro1 Makro ' ' Klawisz skrótu: Ctrl+d ' ile = Int(InputBox("Ile? ", "Wpisz liczbę całkowitą", 3)) If ile < 1 Then Exit Sub l = 1 Range("C4:D17").Copy ...

    Software serwis   23 Paź 2018 11:32 Odpowiedzi: 4    Wyświetleń: 741
  • Excel - VBA prosty schemat magazynowy

    Ja bym zrobił tak, że po wpisaniu nazwy urządzenia wyskakuje okno gdzie podajsz ilość pobrania lub oddania. With Target If .Address(0, 0) = "E2" Then Application.EnableEvents = False ilosc = InputBox("Ile pobrano?") If .Value <> Empty Then On Error Resume Next ...

    Obsługa oprogramowania   08 Gru 2018 09:13 Odpowiedzi: 19    Wyświetleń: 1482
  • [Excel, VBA] kopiowanie danych z wielu plików do jednego zbiorczego

    Witajcie Potrzebuję pomocy przy napisaniu kodu VBA. Mam w folderze: "zestawienia" kilkanaście plików .xlsm i .xlsx. Wszystkie pliki mają po jednym arkuszu (różne nazwy), ale nagłówki i liczba kolumn jest taka sama (kolumn jest od A do N). W tym folderze mam też utworzony plik: 2017_zbiorczy.xlsm...

    Programowanie   22 Mar 2019 08:27 Odpowiedzi: 4    Wyświetleń: 513
  • excel - lista + funkcja vlookup z możliwością edycji

    Ewentualnie można zastosować makro zdarzeniowe, np. takie: [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) Dim cel As Range If Intersect(Target, Range("C3:C15")) Is Nothing Then Exit Sub If Target.Count > 1 Then Exit Sub Set cel = Target.Offset(, 1) Select Case Target.Value ...

    Obsługa oprogramowania   26 Mar 2019 19:48 Odpowiedzi: 6    Wyświetleń: 588
  • Excel VBA Makro do kopiowania danych między plikami i tworzenie arkuszy

    Dziękuję za sugestie. Dodano po 16 Z kopiowaniem sobie poradziłam. Jednak mam problem z automatycznym stworzeniem arkuszy dla wszystkich osób z listy. Dla jednej osoby, pojedynczej aktywnej komórki wiem jak stworzyć. A czy jest możliwość stworzenia makra, które po kliknięciu przycisku stworzy...

    Obsługa oprogramowania   15 Maj 2019 05:27 Odpowiedzi: 4    Wyświetleń: 945
  • EXCEL VBA wyszukanie tekstu z kopiowaniem

    [syntax=vbscript]Sub DoNotatnika() Dim B As Long A = InputBox("Znajdź: ", "Podaj") If IsNumeric(A) Then A = CLng(A) If A = "" Then Exit Sub On Error Resume Next B = Application.Match(A, Range("A1:A10"), 0) If B > 0 Then Plik = ActiveWorkbook.Path & "\Kopia.txt" Open Plik For Output As...

    Obsługa oprogramowania   09 Paź 2019 12:37 Odpowiedzi: 3    Wyświetleń: 645
  • Excel - zabezpieczenie poszczególnych arkuszy hasłem

    [syntax=vbscript]Private Sub Workbook_Open() For x = 2 To Sheets.Count Sheets(x).Visible = False Next a = InputBox("Podaj hasło:") For x = 2 To Sheets.Count If Sheets(x).Range("AA1") = a Then Sheets(x).Visible = True Next End Sub[/syntax]

    Obsługa oprogramowania   29 Sty 2022 13:29 Odpowiedzi: 15    Wyświetleń: 3291
  • Excel VBA - Dane z plików *.BIN do arkusza

    Moje rozwiązanie wyglądałoby jakoś tak: W kodzie w miejscu debug.print masz dostępne już wartości buf (dwubajtowy bufor z zapisanymi danymi) oraz zmienne L1 i L2 skonwertowane do wartości heksadecymalnych z zerami wiodącymi.

    Obsługa oprogramowania   22 Paź 2019 07:33 Odpowiedzi: 7    Wyświetleń: 465
  • EXCEL - VBA - Case, zmienna w nazwie pliku

    Witam, myślę nad uproszczeniem kodu, żeby nie powielać go kilkadziesiąt razy - mam dwie zmienne w nazwie: 1 _ ... Styczeń ... .xlsm. Proszę o pomoc, tak aby przy wyborze Case np. 2 - dane pobierały się z pliku: 2_ ... Luty ... .xlsm oraz analogicznie przy wyborzez Case: 12 - dane pobierały się z pliku:...

    Programowanie Początkujący   04 Gru 2019 02:00 Odpowiedzi: 8    Wyświetleń: 504
  • VBA kopiowanie warunkowe wierszy Excel

    Witam Temat niestety oklepany - na swoje usprawiedliwienie powiem, że przeszukałam forum i usilnie staram się dopasować znalezione wskazówki i fragmenty makr do swoich potrzeb. W pewnym stopniu mi się udało, ale gdzieś jest błąd którego nie potrafię namierzyć. Zależy mi na tym, żeby wyszukiwana...

    Programowanie Początkujący   11 Lut 2020 16:51 Odpowiedzi: 8    Wyświetleń: 501
  • Excel - VBA, makra, corpo, drukowanie za pomocą makr

    Rozwiązałem swój problem w nast. sposób: Sub drukowanieprawidlowe() ' ' drukowanieprawidlowe Makro ' ' Dim i As Integer i = InputBox("Numer wiersza") Workbooks.Open Filename:="C:\Users\Dominik\Desktop\Zesz... Application.Left = 1 Application.Top = 1 ...

    Programowanie Początkujący   28 Kwi 2020 10:39 Odpowiedzi: 9    Wyświetleń: 1002
  • Kolor czcionki makro - excel

    Niestety wydaje mi się że przez to że ten tekst w tym momencie znajduje już się w wordzie. Może pokażę szerszy kontekst [syntax=vbscript]Sub Match() Dim SER As Variant SER = InputBox("Podaj nr") Dim wordDoc As Word.Document Dim wordSelection As Word.Selection ...

    Programowanie Początkujący   18 Maj 2020 19:23 Odpowiedzi: 9    Wyświetleń: 792
  • Excel VBA Złe działanie pętli for next

    Dzień dobry mam problem z pętlą for. Mam poniższy kod: [syntax=vba]Sub m2() Dim s As Double t = InputBox("Podaj głębokość maksymalną [m]") Range("A2").Value = "Głębokość maksymalna:" Range("A2").EntireColumn.A... = t For s = 0 To t Step 0.2 Range("B6").Offset(0,1).Value =...

    Programowanie Początkujący   08 Cze 2020 16:48 Odpowiedzi: 6    Wyświetleń: 315
  • EXCEL VBA wysyłanie maila (Prześlij dalej) na podstawie

    Poniżej kod, który działa i wyszukuje mi wiadomości, które w temacie mają wprowadzone przez użytkownika frazy. Dzięki licznikowi zwraca on tylko jednego maila, jeśli znajdzie już o owym temacie w skrzynce (a nie wszystkie, które znajdzie), aczkolwiek chciałbym, aby makro zwracało mi ostatni wysłany,...

    Programowanie Początkujący   14 Lip 2020 18:37 Odpowiedzi: 5    Wyświetleń: 477
  • Excel [VBA] Wyszukanie pliku po nazwie i skopiowanie z niego wartości danej komó

    W Twoim makrze w miejscu gdzie jest nazwa na sztywno zastosuj funkcję INPUTBOX. Wpisaną wartość (1 lub 2 lub 3 itd) wprowadzasz do nazwy pliku wg schematu" Folder_plików + stałay_przedrostek_nazwy + wprowadzana_wartość + ".xlsx" Jeśli chodzi o kopiowanie komórki to raczej nie pomogę bo ja stosuję...

    Programowanie Początkujący   29 Lip 2020 10:34 Odpowiedzi: 10    Wyświetleń: 1491
  • Excel VBA - Makro kopiujące komórki z wybranego wiersza

    Witam czy moge dolaczyc do watku, jak mozna zmienic komorki docelowe zeby byly w innym pliku i w roznych miejscach nie nastepujacych po sobie> dzieki za pomoc Witaj wielkie dzięki za pomoc. Działa dokładnie tak jak chciałem ;-) pozdrawiam Wydzieliłem jako nowy temat. Nie podpinaj...

    Obsługa oprogramowania   13 Sie 2020 19:11 Odpowiedzi: 1    Wyświetleń: 168
  • Excel VBA szukanie - szukanie w jednej kolumnie i zwracanie wyniku z drugiej

    Witam Szukam wszędzie i nie mogę znaleźć rozwiązania prostego problemu... Mianowicie za pomocą InputBox wpisuje jakiś numer i chciał bym wyszukać go w pierwszym skoroszycie (111) w kolumnie A Jeżeli znajdzie: to zwróci wartość tego samego wiersza z kolumny B przejdzie do skoroszytu...

    Obsługa oprogramowania   30 Wrz 2020 05:41 Odpowiedzi: 8    Wyświetleń: 540
  • kopiuj wklej do kolejnej wolnej komórki w kolumnie excel vba

    Czy należy zmienić coś ...? No oczywiście zmienić :D , ale nie w tym miejscu, które wskazujesz :not: Można np tak (przykładowo dla przycisku 1): [syntax=vbscript]Sub e1() With Sheets("Dane1") Lr = .Cells(.Rows.Count, "A").End(xlUp).Row + 1 If Lr <= 20 Then .Cells(Lr,...

    Programowanie Początkujący   29 Paź 2020 20:28 Odpowiedzi: 7    Wyświetleń: 858
  • Excel VBA makro kopiujące dane z arkusza do innego arkusza do różnych komórek

    Chyba łatwiej zrobić dwuklik na wierszu, z którego chcesz kopiować. Równocześnie uruchamiasz makro i wskazujesz wiersz. Możesz też się upewnić, czy to właściwy wiersz. Oczywiście można też wstawić tam InputBox, tylko wtedy jak chcesz uruchamiać to makro? Jeśli chodzi o moją propozycję, to komórki docelowe...

    Programowanie Początkujący   20 Lut 2021 15:31 Odpowiedzi: 8    Wyświetleń: 441
  • Excel VBA - Makro wyszukujące konkretne dane

    [syntax=vbscript]Sub Zawiera() Sheets("Arkusz1").Select a = InputBox("Podaj tekst do szukania: ", "Wyszukaj") ow = Cells(Rows.Count, "A").End(xlUp).Row y = 1 For x = 1 To ow If InStr(1, Cells(x, 2), a) > 0 Then Range(Cells(x, 1), Cells(x, 2)).Copy Sheets("Arkusz2").Range("A" & y) ...

    Obsługa oprogramowania   31 Sie 2021 10:23 Odpowiedzi: 5    Wyświetleń: 240