makro scalające

Makro EXCEL scalanie komórek z różnym zakresem danych

[syntax=vbscript]Sub Scal() ow = Cells(Rows.Count, "A").End(xlUp).Row b = 1 For x = 1 To ow If Not f Then b = x f = True End If If Cells(x + 1) <> Cells(x, 1) Then Range(Cells(b, 2), Cells(x, 2)).Merge Cells(b, 2) = Cells(x, 1) f = False End If Next End Sub[/syntax]

[VBa Excel] - Makro do scalania arkuszy z wielu skoroszytów

wyskakuje jeszcze błąd z tą samą nazwą arkusza W Skoroszyt zawierający makra zostawić tylko jeden arkusz i dać mu jakiś unikatową nazwę(ale Excel, sam zmienia nazwę (dodaje (2)), a następnie zmiany nazwy na nazwę skoroszytu) Chcesz wybrać pliki indywidualnie? Wtedy [syntax=vb] Sub zbior() Dim wb As Workbook Do fl = Application.GetOpenFilename("ExcelFiles....

Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

Makro EXCEL - przenoszenie wyfiltrowanych danych do jednego arkusza z innych

To może jaśniej - mam makro, którego zadaniem jest scalenie dokładnie 9 plików excel do jednego zbiorczego pliku. Makro scalające jest powyżej. Może i koślawe ale działa :) Do tego makra chcę dorzucić filtr, mający za zadanie scalić dane od - data początkowa, do - data końcowa. Obie daty, mogę wprowadzać w odpowiednie komórki w arkuszu, przed generowaniem...

pętla scalająca komórki i pozostawiająca wartość

Dzięki wielki. Makro działa, tak jak chciałem

Makro VBA do scalania komórek w pętli - dlaczego nie działa?

Czułem, że trzymasz coś w rękawie ;) Z takim pryszczem poradziłabyś sobie. Spróbuj takiej pętelki [syntax=vb]Sub Merguj() Dim wrs As Long, merg As Long wrs = 1 merg = wrs Application.DisplayAlerts = False Do While Cells(wrs, 1) <> "" If Cells(wrs, 1) <> Cells(wrs + 1, 1) Then With Range(Cells(merg, 1), Cells(wrs, 1)) .Merge .HorizontalAlignment...

Excel: Import TXT, czyszczenie makrami, zmiana struktury kolumn - scalanie i zamiana wierszy

Prosty przykład w załączniku.

Excel VBA makro - Scalanie plików z folderu, formatowanie i okienka dialogowe

Witam, potrzebuję makro do scalania wielu plików z danymi w jeden. Wszystkie skoroszyty do scalenia znajdują się w jednym folderze, dane do scalenia są zawsze w pierwszym arkuszu i mają jednakowe obszary. Jako, że nie bardzo radzę sobie z VBA, skorzystałem z dostępnego makra, które później lekko zmodyfikowałem do własnych celów. Jednakże pozostało mi...

Makro w Excelu: Scalanie i formatowanie od zaznaczonej komórki

Jeżeli chodzi tylko o określenie położenia zaznaczonej komórki to jest to ActiveCell i odpowiednio do potrzeb .Address, .Row, .Column.

Jak stworzyć makro w Excelu do scalania plików z folderu w jeden plik?

Tak, oczywiście jest możliwe. Najprościej używając funkcji Dir w pętli Do Until , jednocześnie zmieniając nazwy kopiowanym arkuszom wg. aktualnie otwartego, pliku źródłowego.

Nieudane scalanie danych ze schowka w Excelu - Makro i różne metody próbowane

Coś czarujesz! Gdzie Ty wpisywałeś to CutCopyMode? Powinieneś wpisać przed zamknięciem każdego pliku, czyli tu: [syntax=vbscript]Application.CutCopyMode = False Skor.Close False[/syntax]Sprawdzałem i u mnie komunikat się nie wyświetla.

Jak napisać makro VBA do scalania danych z plików Excel w folderze?

W przykładzie na który się powoływałem w tamtym poście był błąd, niedopatrzenie autora... Poprawny przykład wylistowania plików w katalogu zamieszczam poniżej: Private Sub CommandButton1_Click() Dim nextFile As String 'sciezka do katalogu myDir = "C:\" 'jakich plikow szukamy myFile = "*.txt" nextFile = Dir(myDir &...

Automatyczne scalanie wielu plików Excel w jeden za pomocą makra VBA

Dziękuje

Excel/VBA - Automatyzacja scalania komórek i sortowania danych księgowych

Chyba będzie trzeba podejść do tego trochę niestandardowo. Najpierw posortowałbym dane źródłowe wg. klucza Kol C, D, O, N, M - tu można nagrać makro. Dalej podwójnie, no oko, zagnieżdżona pętla -scalanie w kol.H (wg. partner), a na zewnątrz dopisanie wiersza ze scaleniem F&G i scaleniem w C, D, E (wg. NIP) + przepisywanie danych. Oczywiście najpierw...

Zlecę wykonanie makro w ecxelu generującego nagłówki

Ma pobierać typ danych z prawej kolumny i gdy się ciąg zmieni w niej tylko wartość na inną wtedy dodać scalający wszystkie kolumny (cała szerokość kolumn w 1 wierszu) nagłówek z wpisem w zawartości z nowym wpisem ciągu. Tak jak na obrazkach jest pokazane. 1 to dane przed zmianami a 2 pokazuje to co chcę uzyskać. Może być Access.

Makro Excel: Jak łączyć wiersze z identycznymi wartościami w kolumnach A-H, K?

Piszesz, że ma scalać wiersze, jeżeli wartości w kolumnach A:H oraz K są takie same, a w przykładzie: w 6 wierszu wartość w kolumnie A jest inna, a w 3 wierszu: w kolumnie G - mimo to zaznaczyłeś je na żółto. To jak to w końcu jest?? Czy scalanie dotyczy tylko jednej tabeli, czy wszystkich? Czy one mają stałą długość, czy się zmieniają? Czy wiersze...

Jak stworzyć makro w Wordzie do korespondencji seryjnej z osobnymi plikami?

Witam. Ponieważ makro w wordzie jest mi trochę obce (w excelu trochę lepiej, ale mistrzem to na pewno nie jestem) chciałbym poprosić o radę. Chodzi o korespondencję seryjną, wysyłam listy w pracy o treści takiej samej, ale do wielu osób. Dane adresatów, które pojawiają się w liście pobierane są z excela. Ostatnia operacja przy korespondencji seryjnej...

Excel 2007 - Excel, zliczanie dat w kolumnach sformatowanych jako data

Witam, mam problem z formułą. Mianowicie potrzebuje takiej która by spełniała warunki: a) Zliczała ilość unikalnych dat z unikalną godziną w kolumnie C dla określonego miesiąca. b) W kolumnie "C" sformatowanej jako data (z godziną) zliczała ilość wierszy z określonym miesiącem. (Np. tylko październik, tylko listopad) c)Nie dublowała dat z tą samą godziną...

Korespondencja seryjna + zapis pliku pod nazwą z kolumny bazy danych

Skopiowałam sobie poprawione według wskazań powyżej makro, które teraz wygląda tak: Sub Test() Call DoOsobnego(oWzorDoc:=ActiveDocument, _ sDir:=ActiveDocument.Path) End Sub Public Function DoOsobnego(oWzorDoc As Word.Document, _ ByVal sDir As String) As Boolean On Error GoTo DoOsobnego_Error Dim r As Long Dim lngRecs As Long If Right(sDir, 1) <>...

Excel 2003, makro szukające określonyc wierszy w kolumnie.

scalić pomijając kody Och, nie chce mi się już przerabiać (czytaj: znacznie upraszczać kodu, bo tablica w takim przypadku jest zbędna). Dołożyłem scalanie, podkreślanie i takie tam... Resztę sobie dopracuj. Makro wystarczy uruchomić z poziomu arkusza źródłowego (dla ułatwienia dałem przycisk). Na "przywitanie" dostałeś (prawie) gotowca. Ale następnym...

Makro do łączenia komórek w wierszach w zależności od ich wypełnienia

https://obrazki.elektroda.pl/2598050500_... Witajcie, chciałabym napisać makro, które będzie łączyć komórki tak jak zrobiłam to ręcznie w przypadku E01 i E02. Z pomocą formuł wypełniają mi się pewne komórki, a następnie komórki zawierające jakiś tekst kolorują się na wybrane kolory. Ostatnim etapem jest złączenie ich w jedną całość...

Jak napisać makro do importu plików txt do Excela w jednym arkuszu?

Ok działa, jednak jest jedno ale, teksty z połączonych plików stanowią jednolity, ciągły tekst, a czy można zrobić tak aby każdy scalany tekst zaczynał się od nowej linijki?

scalanie sąsiadujących komórek o tej samej wartości

Mam tabelę, w której chciałbym scalić komórki w kolumnie B i G. Czy jest możliwość, aby makro sprawdziło kolejno w kolumnie B komórki i scaliło wszystkie o tej samej wartości (one sąsiadują zawsze ze sobą), a następnie taki sam format zastosowało do kolumny G. W załączniku umieściłem przykładową tabelę (po lewej stronie), Po obróbce przez makro ta tabela...

Excel - Tworzenie makra - sortowanie i przenoszenie między komórkami

adamas_nt, to co robi Twoje makro można uzyskać (chyba...) tym samym sortowaniem o jakim pisał marek003... Albo ja coś źle robię... Ale nadal nie grupuje mi np. nazw miast w jednej komórce, godzin w jednej komórce... Da się to jakoś ugryźć? znalazłem takie makro: Sub scalaj() Dim w As String, i As Long With Selection w = .Item(1) For...

VBA Excel: Jak scalić skoroszyty xls zaczynając od wiersza 3 bez pomijania danych?

Problem rozwiązany dodałam do kodu 3 Application.ScreenUpdating = True Set Skonsolidowany = Worksheets.Add() Plik = Dir(Folder & "*.xls") Do Until Len(Plik) = 0 Licznik = Licznik + 1 Application.StatusBar = "Konsolidacja pliku nr " & Licznik Set Skor = Workbooks.Open(Folder & Plik) Set Ark = Skor.Sheets(1) iRows = Sheets(1).UsedRange.Rows.Count...

Excel - Usuwanie odfiltrowanych wierszy wraz z grafiką za pomocą makra

W kolumnie D nie widzę w ogóle Z. Po analizie jak to działa stwierdzam, że: 1) Chciałem usuwać te pliki hurtem, żeby było szybciej, ale okazuje się, że to za dużo i jednym poleceniem odwołującym się do tablicy z nazwami tego się nie da zrobić. Widocznie jest jakieś ograniczenie, którego nie znam. Wobec tego trzeba usuwać pojedynczo. Dopisałem nową procedurę...

Excel-Blok. zapisanych komórek - nie zapisane dalej mozliwe do edycji

przekopiowałem kod do vba w moim pliku przestało to wszystko działać Zaproponowałem kod prywatny do obsługi skoroszytu - zatem musisz go wkleić dla obiektu ThisWorkbook :!: Po skopiowaniu kodu i dostosowaniu nazwy roboczego arkusza - plik musi być zapisany jako xlsm :!: Ze względu na zastosowane uproszczenia zapisu kodu - każdorazowo trzeba "wychodzić"...

VBA - Jeżeli wartość komórki inna niż liczbowa makro zwróci błąd

Scalone komorki w zakresie kopiowania? Jeżeli chodzi o zakres kopiowania i wklejania żadne z komórek nie są scalone, staram się unikać scalania komórek, co może być innego przyczyną tego błędu ?

Excel- Kopiowanie odpowiednich komórek do akrusza wynikowego

Np. potrójnie zagnieżdżoną pętlą For wg.schematu: For pracownik = 1 To ilePracowników (tu przydałaby się rozpiska w osobnym arkuszu np. "Pracownicy", bo gdzieś trzeba ich policzyć)   For miesiac = 1 To ilość miesięcy (tu LCase(nazwa arkusza) lub indeks daje nazwę m-ca) w tej pętli obliczasz bez zerowania również Nr wiersza wynikowego dla arkusza "Wynik"....

[EXCEL / VBA] - Jak stworzyć makro do kopiowania arkuszy do zestawienie?

Witam, potrzebuję pomocy przy stworzeniu makra, które kopiowałoby zawartość arkuszy i wklejało je jeden pod drugim w arkuszu "zestawienie". Dokładniej mówiąc - mam plik, w nim trzy arkusze (np. aaa, bbb i zestawienie), chciałbym aby makro skopiowało cały arkusz "aaa" (bez nagłówka) do momentu napotkania pustego wiersza i wkleiło do arkusza "zestawienie",...

Excel 2010 - kopiowanie kom... - Kopiowanie zawartosci komorek od komorki...

Wlasnie te teksty pomiedzy "DANE TECHNICZNE" a "INNE WARIANTY" ma kopiowac w kolumnie A i scalac je zeby wkleic ostatecznie do komorki N2 w arkuszu 3 Chce zeby opis produktu zawierał dane techniczne (tworze makro do masowego robienia plikow CSV, ktore potem importuje w sklepie internetowym)

Samsung RV510 - Laptop nie włącza się, dioda świeci, możliwy problem z BIOS-em

To o Bios"ie przez autora Widać też, że ktoś przy nim majstrował Naczym polegało to ? majstrowanie" ? Daj foto. makro tego miejsca, Podaj model płyty... opisy z MB, np. SCALA-15L rev:MP 1.1 SCALA-15L rev:MP 1.0 BA92-07xxx BA41-013xxA Tam jest jeszcze słynny NEC_Tokin http://obrazki.elektroda.pl/6123290300_1...

Excel: Jak scalić arkusze o tych samych nazwach z wielu plików?

Witam. Znalazłem w sieci Marko które wykorzystuje do scalania danych z wielu skoroszytów do zbiorczego. działa wyśmienicie (scala dane z pierwszego arkusza skoroszytów) ale pojawiła się potrzeba scalenia arkuszy z rożnych plików po nazwie arkusza czyli mam 10 plików źródłowych z arkuszami "Arkusz1", "Arkusz2","Arkusz3","Arkusz4".............. chciałbym...

[Excel] Scalanie komórek tekstowych wg wartości z jednej kolumny

Nie jestem guru od makr w VBA, ale coś takiego powinno zadziałać (zrobiłem testy na prostym arkuszu wklepanym z palca). [syntax=vb] Sub Makro1() Dim xo As Integer xo = 2 Columns("A:B").Select Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Key2:=Range("B2") _ , Order2:=xlAscending, Header:=xlYes, OrderCustom:=1, MatchCase:=False _ , Orientation:=xlTopToBottom,...

Excel - VBA - scalanie komorek w zaleznosci od zawartosci

Panowie, Przepraszam z góry, jeżeli umieszczam post w złym miejscu :) Chcę stworzyć makro, które w zależności od zawartości danej komórki, będzie scalać odpowiedni zasięg komórek. Mniej więcej aby wyglądało to w ten sposób: http://obrazki.elektroda.pl/4064407500_1... http://obrazki.elektroda.pl/9854831800_1... Pomysł...

scalanie komórek, które zw zaznaczonym zakresie mają te same dane.

Cześć, mam już część makra, ale niestety nie działa na całym zaznaczonym zakresie. Nawet wiem dlaczego, ale nie umiem poprawić. https://obrazki.elektroda.pl/5315120000_... tak chcę by wygladało https://obrazki.elektroda.pl/5152282400_... Pomożecie?

Jak i czym fotografować elektronikę? Wielki poradnik Urgona 1 - Sprzęt.

Wcześniej już wspominałem, że w moim przypadku, pomimo wieloletniego doświadczenia z aparatami i fotografią analogową, musiałem nauczyć się robienia zdjęć lustrzanką cyfrową. Analogowe aparaty były znacznie mniej wymagające ale też miały ograniczone możliwości. Zdjęcia da się źle wykonać KAZDYM aparatem. Podobnie jak i zrobić dobre. Są tylko pewne ograniczenia...

Visual Basic - Makro do edycji elementów w aplikacji Office

Z kolorem to jasne - trzeba stworzyć trzy makra, każde dla innego. Bardziej chodzi mi o element który będzie zmieniany. Chciałym zamienić ItemFromID(x) na aktualnie zaznaczony myszą element. Ostatnio miałem podobny problem w Excelu (chodziło o możliwość scalania i formatowania komórek w ten sam sposób, ale tam wystarczyło wyrzucić linię określającą...

Dodawanie kolumn z datą i numerem podczas scalania arkuszy VBA z unikalnymi nazwami plików

To nie było gotowe rozwiązanie, ale schemat podzielenia nazwy pliku, oczywiście w ten sposób możesz też podzielić nazwę pliku. Tak, potrzebna jest pętla. Mniej więcej taki algorytm musisz pomyśleć gdzie to wkleić, bo część już masz zrobione 1. Wyszukujesz plik są różne sposoby wyszukania i w związku z tym różne konstrukcje pętli. 2. Jeżeli jest plik...

Excel - Jak przenieść dane między tabelami o różnym układzie?

https://obrazki.elektroda.pl/9396852000_... Wstępna ocena dostępnych informacji Na załączonym ekranie widoczne są dane zapisane w arkuszu kalkulacyjnym Excel. Arkusz zawiera trzy główne tabele: 1. Tabela 1 (kolumny A-D): zawiera dane liczbowe pod nagłówkami „LO”, „CW”, „ZW”, „CO”. 2. Tabela 2 (kolumny E-H): na razie wypełniona jedynie w...

Excel 2007-VBA - generowanie złożonych formuł tablicowych z teks

Witam Dzięki Maciej Gonet za pomoc :D . Dla zainteresowanych [syntax=vb]Sub tworzenie_formuły_tablicowej() ' ' tworzenie_formuły_tablicowej Makro Sheets("generator formuł").Select a = Sheets("generator formuł").Range("A5").Value b = Sheets("generator formuł").Range("A7").Value c = Sheets("generator formuł").Range("A11").Value d = Sheets("generator formuł").Range("A13").Value...

Excel - makro do scalania i przenoszenia tekstu w kolumnie G

Witam, mam zapytanie o makro z funkcją "złącz teksty" tzn. chciałabym, żeby w wstawionych wierszach w kolumnie "G" były przeniesione i scalone teksty z tej kolumny jeżeli... poniżej przykład: /wstawiony wiersz/29337 12183 3825 28713 6457 1327 14471 Warszawa29337 Warszawa12183 Warszawa3825 Warszawa28713 Warszawa6457 Warszawa1327 Warszawa14471 /wstawiony...

Excel - Makro do przenoszenia wartości zwrotów w planie transportowym

Witam. Przeglądałem kilka tematów tu na forum które dotyczyły mojego problemu niestety żaden nie tyczył dokładnie tego co mnie interesuje. Pracuje jako specjalista ds. transportu w niewielkiej sieci marketów i tworząc plan transportowy dla samochodów musze po skończeniu wpisać tzw zwroty (puste palety, kartony, kosze z butelkami etc). Sklepy zgłaszają...

Makro Excel kopiowanie plików - Scalanie plików z jednego katalogu w całość

Witam. Potrzebuję pomocy a najlepiej gotowego rozwiązania pozwalającego na scalenie wielu plików xls znajdujących się w jednym katalogu do jednego finalnego pliku xls. Rozwinę problem. Mam utworzony jeden plik wzorcowy, zawierający w swym składzie 4 arkuszy (raport, dane_wejściowe, dane_wyjściowe, roboczy. Dodatkowe 200 plików od nr 1 do 200 są to "wizualnie"...