makro scalanie

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]

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.

Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

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

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.

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

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

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

Prosty przykład w załączniku.

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

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

Po obróbce przez makro ta tabela powinna wyglądać jak ta po prawej stronie Takie kody tylko na elce :) [syntax=vbscript]Sub elka() Application.DisplayAlerts = False x = 3 Do While Cells(x, "B") <> "" a = Application.CountIf(Columns(2), Cells(x, "B")) With Union(Cells(x, "B").Resize(a), Cells(x, "G").Resize(a)) .Merge .VerticalAlignment = xlCenter...

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

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

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

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

Excel - Sortowanie alfabetyczne w tabeli z synchronicznym sortowaniem kolumn

Scalanie to nie jest - moim zdaniem - właściwa droga. Raczej trzeba wypełnić wszystkie wiersze w kolumnie A, posortować, w końcu usunąć zbędne wpisy. Nie jest z tym tak dużo roboty, gdy czynność trzeba powtarzać wielokrotnie, można ewentualnie napisać makro. Można to zrobić tak: 1) w kolumnie A w pierwszej wolnej komórce (arkusz ANG - PL, komórka A3)...

[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-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ć"...

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

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

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

Dziękuje

excel - VBA: dodawanie wierszy + scalanie wybranych komórek

Witam Jak napisać makro które będzie przeszukiwało kolumnę A i B http://obrazki.elektroda.pl/4124127900_1... Jeżeli w kolumnie B będzie więcej niż jeden ciąg znaków to dodaje wiersz i scala komórki jak na zdjęciu poniżej wartość z komórki A wkleja do scalonej komórki a wartości z kolumny B z danego wiersza wkleja do oddzielnych komórek...

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

Excel VBA - Pętla Do While Loop nie przeskakuje na kolejne arkusze

Mam takie makro, które ma pobierać dane ze skoroszytów i wklejać do jednego. Wszystko działa dobrze z wyjątkiem pętli - nie przeskakuje na kolejne arkusze tylko ciągle pobiera z jednego, maksymalnie dwóch. Co jest nie tak? Sub Scalanie() folder = "D:\Pliki\" Set master = ActiveSheet plik = Dir(folder & "*.xlsx") wiersz = 14 Do While 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 - 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ą...

VBA pobieranie danych z arkusza o różnych nazwach

Mam makro pobierające dane z plików *xlsx w katalogu i wkleja je do aktywnego arkusza. Większość danych pobierana jest z arkusza o nazwie "Arkusz1". Co zrobić aby pobierał dane z arkusza o dowolnej nazwie. Zazwyczaj arkusz wypełniony danymi jest tylko jeden ale czasem zdarza się, że są trzy aktywne arkusze ale tylko pierwszy zawiera dane. [syntax=vbscript]Sub...

Jak skopiować dane z Excela do trzeciego pliku VBA?

Zrobione: [syntax=vbscript]Sub Makro1() Windows("prd_PO Details Report (c)_40307_1885684_2.xlsx"). _ Activate Range("A1:D6414").Select Selection.Copy Windows("SCALANIE.xlsm").Activate Sheets("ROBOCZY").Select Range("A1").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False End Sub[/syntax] Tutaj...

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

MS WORD albo inny program - Kompilacja plików i ograniczona edycja użytkowników

Najlepiej jeszcze aby procesor tekstu sam wypełnił za użytkowników paragrafy ;). Z tego co wiem to MS-Word nie kompiluje plików. Uważaj bo w informatyce ten termin ma trochę specyficzne znaczenie. Chodzi ci oczywiście o łączenie/scalanie plików, a to po angielsku "combining" lub "merging". Wydaje mi się, że za bardzo byś sobie chciał ułatwić/zautomatyzować...

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?

[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 - funkcja lub makro

Do kolegów i koleżanek zwracam z prośbą o pomoc. Exel 2010 jaki używam. Mam zeszyt o nazwie "Wzor program do składnic". W tym zeszycie są arkusze o następujących nazwach: "Informacja", "DANE", "ZASTĄP", "SCALANIE", "DATY_SKRAJNE", "SPIS". W tych arkuszach znajduje się wiele funkcji, które miały mi pomóc w uzyskaniu efektu jaki znajduje się w arkuszu...

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

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

[Atmega32] [Atmega32][C] - Scalanie kodu do wytrawiarki z windą na przekaźnikach

Udało mi się połączyć kod, i dopasować preskalery do Atmegi ale podczas kompilacji napotykam błędy których kompilator nie może dokładnie określić prosiłbym o sprawdzenie całości i ewentualne poprawki [syntax=c]//Sterownik wytrawiarki PCB, LCD2x16, ds18b20 #include <avr/io.h> #include <util/delay.h> #include <stdlib.h> #include <stdio.h>...

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

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

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

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

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

[VBA] - Sortowanie i scalanie wartości z kilku komórek.

Mam plik z makrem, mam plik źródłowy. W pliku źródłowym jest jeszcze kolumna E "Numer Sklepu". Numer Sklepu jest zawsze stały dla konkretnej Nazwy Sklepu, np 31073 to zawsze będzie Stalowa Wola. A teraz o co chodzi. Wynikowo makro sortuje nazwy sklepów chronologicznie do Czasu Dostawy. Zależy mi aby to samo robiło z Numerami Sklepów. Czyli np tak: http://obrazki.elektroda.pl/2150425100_1...

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