Podszedłbym do tematu na dwa sposoby: - formatowanie wyświetlania - ustaw format niestandardowy komórki, a jako typ podaj: (at)"," - oczywiście w cudzysłowu zamiast przecinka może być cokolwiek innego - funkcja, która łączy tekst - zakładając, że kolumna A to Twoje wartości - w komórce B1 tworzysz funkcję: ZŁĄCZ.TEKSTY(A1;",") - po czym rozciągasz funkcję...
[syntax=vb]Sub Numeruj() ow = Cells(Rows.Count, "A").End(xlUp).Row y = 1 For x = 1 To ow If Left(Cells(x, 1), 1) = "*" Then n = Val(Mid(Cells(x, 1), 2)) While Left(Cells(y + x, 1), 1) <> "*" If x + y > ow Then Exit Sub Cells(y + x, 1) = n & ":" & Cells(y + x, 1) y = y + 1 Wend End If x = x + y - 1 y = 1 Next End Sub[/syntax]
Zamiast Range("C2").Value = "=SUMA(C4:C1441)" Range("C2").FormulaLoc... = "=SUMA(C4:C1441)" Dopisanie wartości do nazwy pliku: "D:\Analiza\" & Worksheets(1).Name & "-" & Range("C2").Value & ".xls"
Witaj. Sprawdź: =JEŻELI(A1<2;"Brak promocji";JEŻELI(A1>4,5;&quo... wyróżnienie";"Otrzymał promocję")) Oczywiście zamiast A1 podstaw swoją komórkę. Dodano po 16 Kolegi drugą formułę można poprawić na coś takiego: =ZŁĄCZ.TEKSTY(JEŻELI(J3>4,5;&... wyróżnienie";"");JEŻE...
Najpierw doprowadź do ujednolicenia obu tabelek - obydwie powinny mieć takie same kolumny. Najlepiej importuj obydwa arkusze Excel do Ms Access - a potem z pomocą SQL stworzysz sobie co dusza zapragnie. Jeśli arkusze są używane (modyfikowane) - możesz wstawić je jako tabela z danymi zewnętrznymi, lub kwerendę. Jest też prostszy sposób - Excel - tabela...
Witam Czy orientuje się ktoś jaka jest formuła na dopisanie danych do kolejnego wiersza w arkuszu. Narazie korzystam z range("a2").value ale ta formuła pozwala tylko na wpisanie w jeden wiersz.
włanie to nie wypala, excel sam w sobie to najgorsze co moze do tego być chociaż jako jedyny ma opcję przycisk wstawiania jednym kliknięciem tego screena zdjęcią i to jest super żaden inny tego nie ma. Reszt to już powoduje że szkoda zajmować się excelem nie mówię o szyfrowaniu i braku dostępu do pliku, formatu jak licencja online tego nie obejmie...
Dopisanie " UCase(refka.Offset(, 1)) & ".pdf "" rozwiązało problem. Wszystko dzięki wspaniałej pomocy użytkownika clubs Dziękuję!
Jeśli numeracja ma się zmieniać, to formuła może być np. =WIERSZ(A1)&"|"&A1 gdzie A1 jest adresem pierwszej komórki. Ale Pan nie napisał, że numer ma się zmieniać.
Jak zrobić by excel sam wypałniał dni wolne ( soboty i niedziele) wstawiając automatycznie w te dni np. znak X na czerwono. Próbowałem zrobić to z listą wyboru jedna lista zawierała miesiace druga rok i jakoś mi nie idzie. Data się sama zmieniała ale juz sie poddałem. Pomoże ktoś? Bardzo prosz o dopisanie funkcji do załączonego pliku.
Wystarczy chyba WYSZUKAJ.PIONOWO =WYSZUKAJ.PIONOWO(A1;Arkusz2!A:B...
żeby lista miast zaczytywała mi się automatycznie Z tych 3 rozwiązań, które Ci zaproponowano :D warunek automatyczności spełnia jedynie rozwiązanie "formułowe" :please: Proponuje zrobienie testu = poprzez dopisanie w którymś miesiącu nowej nazwy miasta (np. MAKÓW MAZOWIECKI :idea: ) W wariancie z PQ konieczne będzie odświeżenie zapytania (o ile nie...
Takie makro: [syntax=vbscript]Sub Makro1() ' Klawisz skrótu: Ctrl+q ActiveCell.Value = Range("X1") & ActiveCell.Value End Sub [/syntax]
Nie będzie taki dobry wcale ;) Wszystko zależy, jak szeroki zakres operacji przeprowadzasz, czy faktury będą tylko krajowe, czy także walutowe, czy przewidujesz (a w zasadzie musisz) wystawianie korekt, czy będą faktury zaliczkowe i rozliczające... A o zachowywaniu nie wspomnę. Te wszystkie przypadki sprawiają, że programy okazują się lepsze. A są i...
Makro można modyfikować na tysiąc sposobów. Póki nie rozwiążesz "zagwozdek"... kicha ;) Ale jak już pisałem: od czegoś trzeba zacząć. W załączniku makro (na prostych pętlach, bez regExponent i innych dopalaczy). Celowo starałem się uprościć kosztem wydajności, abyś mógł samodzielnie modyfikować. Na razie sprawdza po imię & nazwisko oraz warunkowo kopiuje...
Macie jakiś pomysł albo podpowiedź na czym lub jak to można zrobić? Najprościej : Strona WWW (np. w PHP) + prosta baza i dostęp w stylu "podgląd llisty/ dopisanie (jeśli jest taka możliwość)". Kiedyś zrobiłem w firmie takie ankiety dla handlowców. Każdy wprowadzał swoich klientów (niezależnie gdzie usiadł w firmie mógł się zalogować na siebie) a kierownik...
Mam nadzieję, że nie zamęczam. Musiałem niestety odrobinę przemodelować tę tabelę stąd też pytanie - Co w poniższym kodzie, trzeba zmienić żeby zamiast kol. B,C,H przerzucał kol. B,C,V z arkusza "kontrole" (kolumny od R stanowią tablice pomocnicze - w zał. plik)? [syntax=vbscript] Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column...
gdzieś mam byka ale nie mam czasu dzisiaj tego poprawić, może jak ktoś rzuci okiem to wyłapie.. jeżeli nie to jutro Czasem szybciej napisać nowe, niż szukać błędu... w cudzym ;) Najprościej wykorzystać kolekcję. Dopisanie duplikatu kończy się błędem, więc w efekcie zostają tylko unikaty... [syntax=vb]Sub kopiuj() Dim nUnique As Collection, sht As Worksheet...
Witam... Znów mam problem z excelem. Skrótowo... pracuje w pewnej sieci handlowej - firma przygotowywuje sie do wdrożenia TMS'a, ale do czasu musimy zastosowac dziwne rozwiązanie zamienne. Sklepów ostatnimi czasy robi się cała masa. Coraz częsciej zdarzają się więc sytuacje, że kierowcy mylą punkty dostaw i jadą w nie te miejsce które ma być (kilka...
A więc mam już wszystko prawie gotowe poza... No właśnie pojawił się kolejny problem. Mianowicie w każdej nowo tworzonej zakładce dodają się wartości z poprzedniej i sumują z wartościami pliku. Czy ktoś wie moze dlaczego? Dołączam spakowany plik a w nim przykładowe pliki oraz arkusz. Z góry dziękuję za pomoc. Dim Data As String Sub ProCollector()...
Witam! Aby Excel zliczał waluty należy sformatować komórki w jako walutowe i wybrać z listy odpowiednią walutę (wtedy symbol dopisuje się sam). W przykładzie Kolegi Excel po dopisaniu symbolu traktuje zawartość komórki jako tekst, sygnalizując to dosunięciem do lewej krawędzi komórki. Zobacz mój przykład.
Borykam się z kolejnym stoperem przy pracy na pliku a mianowicie zmniejszenie wielkości kodu. Jak widać na poniższym kodzie, kod jest bardzo potężny, co prawda działa poprawnie ale jest wielki i w tej chwili potrzebuję rozszerzyć ten kod z opcji wklejania formuł z 220 pozycji na 350 pozycji. Dopisanie poprawnych kodów zajęło by sporo czasu. Proszę niech...
Czy to ma być coś takiego jak w załączniku? Uruchom makro Suma1000. Oczywiście dodatki musisz sobie dopisać. :cry:
Zrobiłby to w ten sposób: (dopisz formuły w szarze komorki)
Chciałbym żeby mój arkusz dopisał sobie wartości M wedle przyporządkowanych numerów. http://obrazki.elektroda.net/69_12720514... http://obrazki.elektroda.net/66_12720514...
Doinstaluj odpowiedni moduł do twojego pakietu Office. (Powyżej dopisałem przykład z autopsji).
Przed linijką: Do While art < zm + 1 dopisz linijkę: art = 2
Jeśli są tylko te 2 możliwości, to można tam gdzie jest: [syntax=vbscript]Case "P2"[/syntax] dopisać K2 (po przecinku): [syntax=vbscript]Case "P2", "K2"[/syntax]
Kliknij na komórkę z wyborem roku i później: - Dane - Poprawność danych - Jeśli pojawi się komunikat, o braku ustawień sprawdzanie poprawności danych, wybrać Tak - w polu Źródło zakładki Ustawienia dopisać kolejne lata oddzielone średnikami
zawartość komórki B1 do AH17 Dopisz [syntax=vbscript]Cells(17, 34) = .Cells(x, 2)[/syntax]
Witam Mam wydaje mi się, że prosty problem odnośnie excela. Wszystkie pola textowe. Mam 2 arkusze: Arkusz 1 i Arkusz2 Arkusz 1 zawiera 4 kolumn w tym: nazwa i rodzaj Arkusz 2 zawiera 6 kolumn w tym: nazwa i magazyn I teraz jeśli nazwa z arkusza 1 występuje w arkuszu 2 to ma w arkuszu 1 w 3 kolumnie wpisac magazyn z arkusza 2. Będę wdzięczny za pomoc.
ale zobacz: Posortuj najpierw... Albo nagraj makro sortowania i dopisz na początku procedury kolegi PRL
Dobry wieczór, Jeżeli makro działa poprawnie i jedynym problemem jest kopiowanie wartości, to powinno wystarczyć dopisanie w linijce po słowie PasteSpecial i spacji (pod koniec kodu) frazy [syntax=vb]Paste:=xlPasteValues[/syntax] Powodzenia.
Trzeba dopisać lub zmienić warunek... Makra, z wyjątkiem procedur zdarzeniowych, umieszcza się w modułach.
O Benek:) Jeżeli 'aktywujesz' to dopisz sobie [syntax=vbscript]MsgBox Cells(Rows.Count, ActiveCell.Column).End(xlUp).Row[/syntax...
a co masz na myśli mówiąc "...podstawiać formuły w osobnej pętli"? Wstaw kolumny, wpisz ręcznie formuły sumowania i przepisz argumenty do makra. Po zakończeniu pętli wstawiającej kolumny i nagłówki (usuń linię z wstawianiem sum), dopisz następną wpisującą tylko formuły.
Witam tak to może być? dane - sprawdzanie wartości, można określić listę na niektórem arkusze tu je naprosto dopisane Przepraszam za gramatykę
Na szybko napisałem ci skrypt wyciągający daty ze stringów. Wyrzuca je w kolumnie "J". Na resztę na razie nie mam czasu, bo lecę w trasę. Jeśli chcesz aby dopisać resztę, to się odezwij. Będę we wtorek.
Jeśli tak uparcie trzymasz swojego, to przed 'End If' dopisz [syntax=vb]Worksheets(ark).Range(Cells(3... 35), Cells(45, 10)).Interior.ColorIndex = xlNone[/syntax]
Tak jak wyżej - docelowo wykorzystaj formatowanie warunkowe. By łatwiej wprowadzać dane trzeba by było dołożyć formuły. Jeżeli sam sobie nie poradzisz to podaj wycinek twojej bazy (przykład) i opisz co i gdzie chcesz wprowadzać (czas koejnego dzwonienia, czy za ile dni ma się przypomnieć) a dopiszemy resztę.
Dołączam załącznik 2 bo w tamtym nie dopisałem kolumny A Nie widzę różnicy między nimi. Uwaga: kolumna P używana do tymczasowo
Po to się daje załącznik, aby pokazać jak będą wyglądać dane i w jakim będą układzie. Poza tym istotne jest też, w której wersji Excela ma to działać. Też tego nie napisałeś. Jeśli w różnych wersjach, to proszę podać najstarszą. Jeśli to jest nowa wersja Excela, to wystarczy funkcję WYSZUKAJ zamienić na X.WYSZUKAJ, czyli dopisać 'X.' przed nazwą funkcji.
Zbyt dużo niewiadomych. Np "żeby go tam dopisał". Jeśli nie mam Twoich danych w mojej Bazie Klientów, to skąd biedny Excel ma je wziąć? No tak to zrozumiałem :) Przydałyby się oba przykładowe pliki w załączeniu + dokładniejsze wskazówki...
Marcin, w którym miejscu to dopisać?
[quote="Andrzej59"]Zrobione w PQ[/quote Po dopisaniu do listy jednej lub dowolnej liczby pozycji trzeba arkusz zapisać i odświeżyć a tabele same się uaktualnią
Witam, spróbuj tak (w Excel 2007 lub nowszym): Zaznacz komórkę z datą następnego badania, kliknij: formatowanie warunkowe -> reguły wyróżniania komórek -> większe niż... -> w okienku, które się otworzy wskaż komórkę w której masz obecną datę i dopisz "+31" (bez cudzysłowów) lub taką wartość dni ile potrzebujesz. Czyli w tym okienku będziesz miał np....
Dopisz przed tą linią: debug.print .Shapes(.Cells(w, 1).Text).name naciśnij Ctrl+g uruchom makro. I co tam wypisało?
Napisałem parę linijek kodu do drukowania etykiet. Zmieniłem nieco wygląd strony ZAMÓWIENIA, usunąłem niektóre kolumny i wiersze oraz wprowadziłem kolumnę do wpisania ilości kpl w paczce. Analogicznie można dopisać kod na 10x etykiety oraz dopisać do etykiet inne dane np. datę, wagę itp.
Trzeba dopisać mnożenie przez frazę: [syntax=text]CZY.LICZBA(SZUKAJ.TEKST(D12...
Nie masz w zestawieniu zera. Trzeba dopisać...
dopisanie transpondera dopisanie pilota dopisanie komputera
mplab pic16f84a toshiba satellite zasilanie programowanie pilotów alarmu skoda
sterowanie indukcji amica odkurzacz migają diody
Jak odczytać stan licznika z drukarki Kyocera FS-9530? Usterka wentylatora w kotle Viessmann Vitodens W50
