[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]
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,...
Witam =ZŁĄCZ.TEKSTY(LEWY(B1;5);A1;... albo =ZŁĄCZ.TEKSTY(LEWY(B1;5);A1;...
[syntax=vb]Sub numery() Dim wz As Worksheet, rs&, re&, i&, j& Dim bs As Range, bd As Range Set bs = ThisWorkbook.Sheets("baza").Range("B1:C1... 'platform, tara Set bd = ThisWorkbook.Sheets("start").Range("B1:C... 'wagony Set wz = ThisWorkbook.Sheets("wykaz_zdawczy") wz.Activate rs = 17 'wiersz poczatkowy re = wz.Cells.Find("podpis").Row...
Hmm. Te tereny leśne (inne tak samo) wpisujesz tak. Najpierw zaznacz dwie komórki i z prawokliku wybierasz Formatuj komórki -> Wyrównanie i tam zanaczasz -> Scalaj komórki . :)
Witam. Posiadam zablokowany plik excela, czy jest możliwość scalania wybranych komórek w kolumnie tak aby użytkownik nie mógł zmienić stylu formatowania komórki?
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ę...
W takim układzie jak jest możesz wyszukiwać odpowiednią liczbę w 'Ar2' i do tej komórki kierować hiperłącze: [syntax=text]=HIPERŁĄCZE("#'Ar2'!A" & PODAJ.POZYCJĘ(WIERSZ()-1; 'Ar2'!$A$1:$A$100;0); WIERSZ()-1)[/syntax]Jeśli komórki są scalone, to hiperłącze od razu wskazuje wszystkie komórki scalone. Bez scalania komórek musiałbyś jakoś określić, do jakiego...
To już wystarczyło zmienić numery wierszy w adresach. Natomiast ważne, aby nie kopiować formuł tablicowych do scalonych komórek. Generalnie to ze scalonymi komórkami same kłopoty. Scalanie komórek - jeśli jest konieczne - powinno być ostatnią czynnością w arkuszu, po umieszczeniu wszystkich danych i formuł. Pozdrowienia
Witam Jak scalić komróki z różnym tekstem,ale w taki sposób żeby scaliło tyle komórek ile jest scalonych w komórce obok (na jej wzór). Dodaje załącznik
Witam, po raz kolejny dziś stanąłem przed ścianą. Mam problem z danymi które ściąga mi makro z kwerendą. W liczbach jest kropka oddzielająca całości od dziesiętnych co uniemożliwia mi ich obróbkę. Wymyśliłem sobie coś takiego co załączyłem poniżej. A więc kwerenda wrzuca mi dane w zakres komórek A2:C20 ja to kopiuję niżej i po skopiowaniu zamieniam...
Witam, mam problem. Chciałabym aby kolor komórek zmieniał się na szary w zakresie od 2 wiersza do pierwszego większego od 1. Chodzi o to że mam plik w którym w kolumnie są wpisane poszczególne zadania jakie ma zrobić pracownik. Jeśli je zrobi wpisuje 1 jeśli nie to wpisuje 0. Na wysokości IXOwego wiersza wpisuje numer zlecenia którego to dotyczy. I...
W załączniku twój przykład. Rzeczywiście przy umieszczeniu kodu w module trzeba było troszkę jeszcze poprawić kod (co uczyniłem powyżej). [Ukierunkować na odpowiedni arkusz] Co do tabel: Proponuje najpierw wcisnąć przelicz a potem opisywać kolory. Chyba że kolory będą zawsze przypisane temu samemu odbiorcy. Wtedy przydałby się arkusz ze słownikiem....
Ja powiem nawet więcej - od prezentacji to jest tabela przestawna (i tam można spokojnie sobie wielowierszowe rekordy robić), a arkusz z danymi musi być jak baza danych - wiersz = rekord, komplet danych w jednej i tylko jednej linijce, bez scaleń, a z powtórzeniami, jeśli chodzi o scalenia pionowe. Scalać w niej można co najwyżej nieznaczące nagłówki,...
Jeżeli z zakresu U38:AU38 pozbyć się scalania komórek oraz w każdą z nich wpisać wartości formatu albumu to można użyć następującej formuły: [syntax=text]=SUMA.ILOCZYNÓW((D4=U38:AU3...
Hej wszystkim, Potrzebuje pomocy z jednym z dużym zadaniem, z którym co miesiąc muszę się męczyć przekujazując dane do księgowości. Robota jaką muszę zrobić jest prosta lecz żmudna, czasochłonna i nudna. Dlatego chciałbym spróbować poprosić o pomoc na forum. Chodzi o to, że po pobraniu danych z systemu musze przygotowac w odpowiedniej formie plik by...
Super, dzięki wielkie.
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ć"...
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)...
Sorry, załącznika nie zobaczę, nie mam prawa nic pobrać, służbowy komp. :) Najprostsze co mi przychodzi do głowy to wykorzystanie szerokości komórek (kolumn). Nie da się tak jeżeli używasz wielu wierszy jeden pod drugim, bo rozszerzają się kolumny a nie komórki. Innym rozwiązaniem może być scalanie komórek o stałej szerokości. Ale bardziej profesjonalnie...
Dzień dobry, Scalanie komórek utrudnia lub uniemożliwia wykonanie różnych operacji m.in. sortowania. Dlatego lepiej nie scalać komórek dopóki nie wykona się wszystkich operacji i dopiero na końcu scalać, jeśli to niezbędne. Należy pamiętać, że w przypadku komórek scalonych dane są przypisane tylko do komórek znajdujących się w lewej górnej komórce zakresu...
ten problem jest rozwiązany, ale mam jeszcze jedno pytanie. Jak scalić komórki zachowując przy tym tekst z tych wszystkich scalonych komórek w jednej ? Excel domyślnie, przy scalaniu komórek, zachowuje jedynie wartość z lewej górnej komórki, a zawartość pozostałych komórek zostaje usunięta. Aby scalić komórki i zachować tekst z wszystkich scalanych...
Trochę przekombinowałeś formułę, nie wspominając o scalaniu komórek :( Zakładając, że kolejność części (w wierszu 7 arkusza 00 i kolumnie E arkusza 01) i miesięcy w obu arkuszach będzie taka sama to wystarczy suma.iloczynów() i transponuj() jako funkcje tablicowe.
Witam, w załączniku przedstawiam tablę którą musze posortować wg kolumny J, potem kolumny I i wg kolumny C. Jednak jak próbuję zaznaczyć komórki i biorę sortuj to wyskakuje mi taki komunikat: Ta operacja wymaga aby scalane komórki miały takie same rozmiary. Jak mam posortować te dane ???? proszę o pomoc:(
... po dodaniu tego kod zaczyna bardzo długo pracować ... Nie obserwuję tego na "prostych" danych, ale spróbuj może w ten sposób: [syntax=vbscript]Option Explicit Sub Czysc_Wszystko_2() Dim czas As Single: czas = Timer If MsgBox("Wyczyścić wszystkie formularze 'Dniówek'?", vbQuestion + vbYesNo, "Potwierdź") = vbNo Then Exit Sub Dim i As Integer, w...
wstawiłam formułę. działa super ale kiedy próbuję ją skopiować w dół mam komunikat "ta operacja wymaga aby wszystkie scalane komórki miały takie same rozmiary". wklejanie formuły w każdy wiersz z osobna jest niemożliwe (mam ponad 2000 wierszy). w załączeniu plik z formułą. co zrobić ? jest jakiś sposób? pomocy!
Nie wiem, czy da się osiągnąć taki efekt jak zamierzasz. Trzeba by było wymyślić jakieś sprytne makro. Standardowo Excel potrafi ukryć wszystkie puste wiersze, a tu należałoby pozostawić pierwszy pusty odkryty. Myślę, że lepiej wykorzystać te mechanizmy, które zostały przygotowane, a nie walczyć z Excelem. Tu należałoby wykorzystać tabelę Excela. Ona...
Witam Mam pewien problem ze scalaniem kolumn w Power Query. Mianowice... Mam tabelę, w której mam w kolejnych kolumnach wymienione pozycje. Potrzebuję wszystkie scalić do jednej komórki z separatorem "; ". Robię to przez funkcję scal komórki i wszystko jest ok. Problem zaczyna się w momencie kiedy do tabeli źródłowej dochodzą kolejne pozycje (kolumny)....
OK, a jeśli zrezygnować ze scalania to jak rozwiązać wpisywanie w danym dniu w jednej komórce całych dniówek od 1 do 6 zmiany i ewentualnych nadgodzin a potem odpowiedniego zliczania według wzoru z powyższego arkusza?
Już nie raz napisano, że scalanie komórek w Excelu jest przyczyną wszelkiego zła. :cry: Tu po zaznaczeniu komórki (a właściwie scalonych komórek) należy: 1) Rozdzielić 2) W formatowaniu komórki ustawić: Wyrównaj zaznaczenie do środka 3) Zrobić Autodopasowanie wysokości wierszy 4) Ponownie scalić, jeśli koniecznie potrzeba. Tekst będzie niestety wyśrodkowany,...
Ten Twój plik to jest stajnia Augiasza. Trudno się połapać o co w nim w ogóle chodzi. Piszesz, że masz problem z kopiowaniem z powodu scalonych komórek. A ja tu w ogóle nie widzę żadnego kodu do kopiowania. Jest tylko kod do sprawdzania kompletności wypełnienia tabelki, uzupełnienia daty i blokady niektórych komórek. Nie ma kodu do zapisu tego, co zostało...
Po pierwsze: zamieść przykładowy plik z tymi danymi. Istotna jest tylko "kolumna2", bo "kolumna1" zawiera tylko powtórzone nagłówki, które nic nie wnoszą. Istotne jest czy imiona i nazwiska są zawsze prawidłowo rozdzielone i czy są w osobnych komórkach, np. Anna Maria Bogusz-Kowalska. Mam na myśli to, czy jest zawsze tylko jedno imię lub jedna komórka...
Bardzo dziękuję. Pewnie w tym tyg. dostanę kolejny plik więc jeśli zadziała to będzie to dla mnie duże przyśpieszenie pracy. Dodano po 6 Zrobiłem teraz "scalanie" i coś się jednak nie zgadza. Komórki pierwsze z lewej (były połączone tak żeby obejmowały pewien zakres komórek z prawej) teraz nie są połączone tylko tekst jest ściśnięty w jednej komórce,...
Mama problem z posortowaniem zawartości excela. Chodzi o to że mam listę filmów. W pierwszej kolumnie tytuł, w drugiej rok, w trzeciej ocena. Chodzi mi o możliwość zabezpieczenia wierszy w taki sposób aby nie rozpadły się przy sortowaniu po danej kolumnie. Wiem że jak zaznaczę kolumnę i kliknę sortuj to zapyta czy rozszerzyć obszar i jak dam ok to będzie...
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...
No właśnie nie moge sie pogodzić z tym, że normalnie sie tego nie da zrobić. Pomijam fakt że arkusz można tak zaprojektować żeby nie było problemów ale taki dostałem. Komórka scalona powinna byc traktowana jako jednostka bez zaszytych rozmiarów. Programiści z microsoftu powinni nad tym pomyśleć. Twój drugi sposób jest troche szalony. Nigdy nie wiadomo...
Super właśnie o to mi chodziło, ale w związku z modyfikacją zwykłe sortowanie nie działało a nie wiedziałem gdzie można dokonać tej zmiany w ustawienia aby poprawnie sortowało dane. Mam jeszcze takie pytanie jakbym załóżmy chciał wydrukować taką listę to w przypadku jak są 3×2 kolumn to jakoś to wygląda w pliku excel, a jak jest więcej to już niekonieczne...
Tak. Przy scalonych komórkach (zarówno w pionie jak i w poziomie) pojawia się ten komunikat. Jeżeli scalenia sa w poziomie można zaznaczyć cały arkusz (kliknąć na narożną "kostkę" między A a 1) i odznaczyć scalanie komórek. Ale jeżeli scalenie było w pionie to po takim zabiegu tekst zostanie przyporządkowany do górnego wiersza a "dolne" komórki które...
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...
Witam serdecznie, mam w pliku excela tabelę ze scalonymi komórkami, pech że muszę ją posortować, a że jest dość duża (2300 wierszy) to nie wchodzi w grę rozłączanie scalonych komórek. Na forum znalazłem już podobne pytania i odpowiedzi do nich, jednak w stosunku do nich u mnie występuje jeszcze jeden problem: ilość scalanych wierszy nie jest stała i...
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...
Ten VAT, to ma dotyczyć łącznej kwoty (w przykładzie 600 zł), czy tylko wynagrodzenia (500 zł)? Gdzie będą te inne osoby (obok, poniżej?), bo nie widać z tego przykładu wyglądu całego arkusza. Poza tym, po co te komórki w kolumnach D:F są scalone? Czy ma to jakieś uzasadnienie? Scaleń należy unikać, jeśli w arkuszu coś się dzieje, bo one często powodują...
Witam Przykład: http://obrazki.elektroda.pl/9352209600_1... Komórki oznaczone na żółto zawierają zmienne wybierane z rozwijanych list. To co widać w komórce A22 tworzę scalając (znak „&”) teksty znajdujące się w komórkach A4:A18. Następnie kopiuję tekst pokazany w komórce A22 i przenoszę do innego arkusza wklejając specjalnie...
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"....
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...
Jeżeli jest to normalne na tym forum to naturalnie za finalną pomoc chcę podarować punkty. To jest Twoja indywidualna sprawa. Darowanie punktów nie jest naturalne na tym forum :) Wskazane jest natomiast kliknięcie przycisku http://obrazki.elektroda.net/23_12596950... Sortowanie kodów: Żeby później nie zgubić grupowania, należałoby (makro) rozpocząć...
J. Walkenbach, "Excel 2003 Programowanie w VBA", str.265: Czego nie potrafią robić niestandardowe funkcje arkusza Opracowując różne funkcje niestandardowe, musisz koniecznie pamiętać o podstawowej różnicy między funkcjami wywoływanymi przez inne funkcje VBA, a funkcjami używanymi w formułach arkusza. Te ostatnie muszą być koniecznie "pasywne". Nie można...
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...
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ą...
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ł...
To akurat udało mi się rozgryźć.Chodzi mi tylko o to że jak wkleję jedną pod drugą to w drugiej jest inna szerokość kolumn.Nie wiem jak to obejść. Robisz dwie kolumny jedna o szerokości tej prawidłowej krótszej a druga obok o takiej szerokości by wspólnie z pierwszą kolumną tworzyły tworzyły tą szerszą kolumnę w innej tabeli. Scalasz w tej tabeli komórki...
Dodano po 34 [syntax=vb]Sub ZlaczB() x = 1 While Cells(x, 1) <> "" y = 0 a = Cells(x, 1) b = "" Do While Cells(x + y, 1) = a b = b & " " & Cells(x + y, 2) y = y + 1 Loop Cells(x, 3) = b Range(Cells(x, 3), Cells(x + y - 1, 3)).Select With Selection .HorizontalAlignment = xlCenter .VerticalAlignment = xlBottom .WrapText = False .Orientation...
Przepraszam, przez roztargnienie trochę namieszałem. Wartości muszą być takie same w kolumnach od "B" do "F" oraz "H" oraz "K". W kolumnie "A" jest liczba porządkowa (czyli nieważna w tym przypadku), a w kolumnie "G" - liczba sztuk na komplet, co w liście produkcyjnej jest również mało znaczące. Czy scalanie dotyczy tylko jednej tabeli, czy wszystkich?...
scalać komórka scalać arkusz excel excel scalać arkusz
rower elektryczny gazelle piekarnik gorenje wyświetlać inwerter samsung lodówka
koncetrator tlenu koncetrator tlenu
Brötje BBS – lokalizacja i funkcja programu 750 w menu serwisowym kotła Watson RR 5866 – jak wyłączyć wyciszenie (MUTE) w radiu, pilot, gniazdo słuchawkowe
