Data to liczba, a liczbę można wykorzystać w pętli FOR, tylko trzeba ją zapisać pomiędzy hashami i "po amerykańsku": [syntax=vb]poz = 2 For i = #4/1/2013# To #5/1/2013# Cells(poz, 1).Value = i poz = poz + 1 Next i[/syntax]
Witam [syntax=vb] Sub myRGB() For r = 1 To 50 Cells(r, 4).Interior.Color = RGB(Cells(r, 1), Cells(r, 2), Cells(r, 3)) Next End Sub [/syntax]
[syntax=vb]Private Sub Workbook_BeforeClose(Cancel As Boolean) If Range("K1") <> "" Then Me.Save Else If Range("A1") > 0 Then MsgBox "Komórka K musi być wypełniona przed zamknięciem dokumentu!" Cancel = True Else MsgBox "OK, komórka K wygląda na poprawnie wypełnioną Smile" Me.Save End If End If End Sub [/syntax]
[syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next If Target.Column = 5 Then nw = Sheets("Logistyka").Cells(Rows.Count, "A").End(xlUp).Row + 1 If nw = 2 Then nw = 1 w = Target.Row Range(Cells(w, 1), Cells(w, 5)).Copy Sheets("Logistyka").Cells(nw, 1).PasteSpecial xlPasteValues End If End Sub [/syntax] Kod na tyle prosty,...
Widzę, że próbujesz sprawdzać jakieś procedury medyczne dla NFZ-u :) =JEŻELI(A1=B1;"TAK";"NIE") https://obrazki.elektroda.pl/7706875600_...
Proszę[syntax=vb]Dim komTmp As String Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Intersect(Target, Range("A1:B4")) Is Nothing Then Application.EnableEvents = False If komTmp = "" Then komTmp = Target.Address If Range(komTmp) = Empty Then Range(komTmp).Select Else komTmp = Target.Address End If Application.EnableEvents = True...
[syntax=vbscript]nazwa = ActiveCell.Value With ThisWorkbook .Sheets("wzor rodzinne").Copy ActiveWorkbook.SaveAs .Path & "\rodzinne\" & _ nazwa & ".xls" ActiveWorkbook.Close End With[/syntax]
Do tego przede wszystkim potrzebujesz bazę z danymi, i dopiero na podstawie tej bazy formułami z wyszukiwaniem można automatycznie wypełniać komórki
Poniżej załączam ostateczną wersję ładnie poprawioną (w sobotni poranek :) ) przez kolegę adamas_nt Przedstawia czytelnie poszczególne kolory i firmy. Tak jak chciał to przedstawiać autor (załącznik autora z plikiem). Przedstawiam przesłany do mnie kod makra a poniżej plik z tym makrem. Sub Kolory() Dim kom As Range, i As Integer, x As Integer...
Dzień dobry, Wydaje mi się, że niepotrzebnie się Pan obraża, bo moje pytanie chyba jednak było zasadne - w nowej wersji usunął Pan to godzinowe formatowanie i teraz wiadomo, że chodziło Panu o liczby całkowite. Lepiej wyjaśnić wątpliwości zawczasu aniżeli zrobić coś nie tak i później poprawiać. Pana problem wcale nie jest banalny i pewnie dlatego nikt...
U mnie działa (oprócz kopiowania wysokości komórki z tym że tego nie ma w kodzie). Możesz podać cały komunikat błędu? Jest możliwość wciśnięcia przycisku "debug" Jeżeli tak to którą linie kodu wskazuje żółta strzałka (zaznaczenie)? Przy każdym formacie wyrzuca błąd. Jak nie formatujesz inaczej to też? A możesz jeszcze podać jak sformatowałeś komórkę?
Jeśli "komórki", to podejrzewam że chodzi o Excel. Prawda/Fałsz? Skąd makro "ma wiedzieć" gdzie zacząć i kiedy zakończyć? Chodzi o pojedynczą kolumnę?
Ale spróbowałeś zastosować moją poradę lub poradę kolegi huluka? Czy dla zasady uważasz że nie wyjdzie? Jak tworzyłem załącznik powstał jeszcze jeden "kłopot" z kodem jeżeli wzór w postaci cyfr będzie tekstem (patrz same czwórki) a komórka będzie tylko sformatowana niestandardowo.
Cześć. Mam nagrane makro na sortowanie tabeli ale chciałbym aby ono się automatycznie uruchamiało po wstawieniu daty (lub po prostu wypełnieniem komórki) w kolumnie C (obojętnie w którym wierszu). Czy ktoś byłby tak miły i napisałby mi taki kod? Przykładowy plik w załączniku. Makro które chcę aby się automatycznie uruchamiało ma nazwę sortTabeliDoZrobienia...
Można zrobić tak jak na poniższym screenie. Dodaj jedną pomocniczą kolumnę i w komórkach zadaj formułę jak na screenie. Ja dodałem dwie pomocnicze kolumny a potem jeszcze formatowanie warunkowe jak na screenie http://obrazki.elektroda.pl/7202333200_1...
Skoro nie chcesz wędki tylko rybkę ... [syntax=vb]Private Sub CommandButton1_Click() For Each cell In Range("c9:c1000") If cell.Interior.ColorIndex = 43 Then cell.Interior.ColorIndex = 41 End If Next cell End Sub[/syntax]
Witam, Proponuję rozwiązanie z zastosowaniem kontroli poprawności danych. W komórce E6 wpisujemy warunek Pełna liczba > 0, pole Ignoruj puste pozostawiamy zaznaczone, w komórce F6 warunek Pełna liczba między Minimum 1 Maksimum =$E6, pole Ignoruj puste wyczyścić, w komórce G6 warunek Pełna liczba między Minimum 1, Maksimum =$F6, pole Ignoruj puste wyczyścić....
Ten kod przypisuje kolejno teksty adresów do tej samej zmiennej i dopiero ostatni tekst , tzn. $B$34 przetwarza. Dlatego to nie może działać. Ale jeśli oczekujesz konkretnej pomocy, to załącz plik z tym problemem, nie musi być oryginalny, jeśli zawiera wrażliwe dane, ale w tym samym układzie. I wyjaśnij dokładnie jak ma to działać. Czy osoba wypełniająca...
Jaki jest cel tego zapisu? [syntax=vbscript]For s = 0 To t + krok Step krok[/syntax]Ile punktów ma być obliczonych? t/krok+1 czy t/krok+2 ? Generalnie takich zapisów należy unikać jeśli krok nie jest liczbą całkowitą, bo nigdy nie wiadomo, ile punktów zostanie uwzględnionych. Jeśli parametry pętli są liczbami całkowitymi to można liczyć, że wartość...
Trzeba było wypełnić odręcznie kawałek na wzór, bo dalej nie jestem pewien, czy o to chodzi. Proszę sprawdzić.
komórki podświetlają się na czerwono nie tylko te po zmianach :cunning: Przecież wyraźnie pisałem: Jeśli interesuje Cię sporządzanie tylko ukrytej kopii wszystkich edycji w arkuszu Rob - to usuń formatowanie warunkowe , usuń kod Workbook_BeforeClose i wymień kod w arkuszu Rob Przy ukrytej archiwizacji wszystkich edycji - traci sens porównywanie tabeli...
Nie dynamiczną nazwę - nazwa arkusza ma być stała, jednak chciałbym się odwoływać do niego za pomocą jakieś zmiennej. Czy zatem ktoś wie jak to zrobić?
Witam. Jakim makrem mogę przeskakiwać automatycznie do kolejnej komórki po wypełnieniu aktualnej bez klikania na enter? Dokładnie chodzi mi o to, że jak do aktualnej komórki (najlepiej z pewnego zakresu, gdzie ma przeskakiwać do kolejnej komórki) wpiszę cyfrę (w moim przypadku w jednej komórce jedna cyfra lub litera) automatycznie przeskoczyło do kolejnej...
Z tego co wiem to arkusz ma 65536 wierszy. [url=http://office.microsoft.com/pl-pl/e... jest mała wskazówka odnośnie excel'a.
Nie, ponieważ mógłbym wtedy zafiltrować tylko jeden kolor, Ale po to są operatory ORAZ() i LUB() za pomocą których można zawrzeć wiele warunków w jednym warunku. Cały czas mówię o filtrze zaawansowanym. A może podaj w pliku xls jakiś przykład. Nawet w VBA filtrowanie po kolorze jest "kłopotliwe" jeżeli korzystasz z formatowania warunkowego. Trzeba...
Czyli chodzi o wypełnienie komórki deseniem kropek ....
Może być coś takiego wklej to ThisWorkbook [syntax=vbscript]Private Sub Workbook_BeforePrint(Cancel As Boolean) If Range("B6") = "" Then MsgBox "Blokada wypełnij B6" Cancel = True Else Cancel = False End If End Sub[/syntax]
Witam Mam problem z rozwiązaniem zadania. Chodzi mi o tą sumę wpłat z zadania ponieważ jeśli wypełnie 3 pierwsze komórki to w reszcie komórek pisząc tą samą formułe (SUMA.JEŻELI) wychodzi mi 0 . Proszę o wypełnienie .
Coś ola, ;) to bym wypełnił wybrane komórki kolorem i dodał to do kodu.
Witam Mam 4 komórki w rzędzie i potrzebuję zrobić coś takiego, żeby po wypełnieniu jednej z tych 4 komórek pozostałe 3 zablokowały sie (tak żeby nic nie można było do nich wpisać) i tak samo 40 pozycji w dół. Czy jest możliwe zrobienie tego w jakiś sposób? Jeśli przez VBA to prosiłbym o dokładny opis bo nie mam o tym zielonego pojęcia
Chcę stworzyć wykres kolumnowy, który w zależności od ilości danych będzie pokazywał tylko wypełnione komórki. Czyli zakres danych mam w kolumnach i za każdym razem będę sobie je wypełniać różnymi wartościami a chcę żeby na wykresie widoczne były tylko wypełnione wartości. Jak to zrobić ???? Excel 2010 Pomysł z wypełnieniem zerami danych komórek powoduje...
W Excel'u (MOffice) jak klikniesz na komórkę z funkcją "=JEŻELI(CZY.LICZBA(D3);D3-C3;0)" to zaznaczy się ta komórka i w dolnym prawym rogu tej zaznaczonej komórki jest "mały kwadracik". Złap za ten kwadracik (lewym przyciskiem myszy) i przeciągnij na dolne komórki. Po puszczeniu lewego przycisku dolne komórki wypełnią się same tą samą formułą i automatycznie...
Jak już piszemy o różnych rozwiązaniach, to zaproponuję takie: [syntax=vbscript]Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Interior.Color = vbYellow Then UserForm1.Show Cancel = True End If End Sub [/syntax] Wystarczy wypełnić na żółto żądane komórki.
Dziękuję za pomoc! Jeszcze jedno pytanie: skoro już mam odpowiednie komórki wypełnione kolorem to jaką funkcją mogę je teraz zliczyć(ilość komórek z wypełnieniem tła)? Da się bez VB?
Hej,mam z pozoru nie wielki ale dla mnie powżny problem z excelem... Nie wiem jak zrobić aby w komórce po zsumowaniu odpowiednio dwóch komórek pojawiała sie ta suma a gdy komórki są puste pojawiała się komórka pusta a nie zera...??? załączam tą tabelkę, potrzebuje wypełnić kolumnę razem brutto. please pomocy!:cry:
Tak jak kolega powyżej napisał. Menu Format> Formatowanie warunkowe... , a następnie tak należy wypełnić wszystkie pola: http://obrazki.elektroda.net/61_12284089...
Przykładowy plik w załączniku. Tak by w pozycji P2 zwracana wartość w obecnym stanie była I2 a jak wypełnię komórkę K2 by zwróciło wartość J2 i tak dalej.
W drugą stronę jak najbardziej. Ale jeśli kolor wypełnienia wstawiasz ręcznie z palety (nie w wyniku formatowania warunkowego), to pozostaje makro lub funkcja użytkownika (też w VBA) z wykorzystaniem Interior.ColorIndex zakresu. Excel nie ma wbudowanych funkcji odwołujących się do właściwości formatowania komórek.
Wpisałem te formuły, ale obawiam się, że to nie o to chodziło, bo pewnie całe te zestawienia trzeba wypełnić, a o tym już nie piszesz.
Wszystko działa jak trzeba, zakresy pozwalają obsłużyć dużą ilość wierszy, dziękuję za pomoc :) Mam jeszcze pytanie: czy można wpleść do powyższego mechanizmu polecenie zmiany wypełnienia koloru wybranych w array komórek? Coś w stylu: jeśli UCase(.Cells(1, k)) <> "JEST" to wypełnij kolor na biało, jeśli inaczej to wypełnij kolor na żółto.
zobacz to [syntax=vb]Private Sub UserForm_Initialize() ost = Worksheets("Kolor").Cells(Rows.Count, 1).End(xlUp).Row userform.SMkolor.rowsource = "Kolor!A1:A" & ost End Sub[/syntax]
Exel - VBA wymuszanie wypełnienia komórki
Jeśli to jest nowy Excel, to najlepiej sprawdzi się tu nowa funkcja WYBIERZ.KOLUMNY. Tylko dlaczego ta ostatnia kolumna ma nagłówek "n", a nie liczbowy? To jest arkusz kalkulacyjny, w którym dane powinny być przede wszystkim liczbowe. Teksty pomieszane z liczbami, to jest dodatkowy kłopot. Co oznacza to "n"? Nie można go zastąpić liczbą? Tu można sobie...
Sprecyzuj bo dla mnie nie jest jasne o co Ci chodzi :( Chcesz się odwoływać do koloru wypełnienia komórki (np. wypełnienie niebieskie) czy do wartości tekstowej koloru w komórce (tekst "niebieski") ? To dwie zupełnie różne sprawy ...
Cześć. Potrzebuje pomocy. Chcę utworzyć excela, które będzie służyć do rejestracji obiegu dokumentów. Z założenia excel po wypełnieniu danej komórki z adresem e-mail -1, za pomocą makra w kolejnej komórce przypisuje datę wypełnienia tej komórki, która jest datą wysłania dokumentu (ta komórka jest zablokowana, tak żeby nie było możliwości ingerencji)...
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)...
Podałeś taki niestandardowy format z łącznikami między elementami czasu, zamiast dwukropków, więc zrozumiałem, że to jest istotne. Jeśli jednak chcesz mieć "prawdziwą" datę, to uzupełnij swój kod tak: [syntax=vbscript]Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Intersect(Target, Range("B1:C10")) Is Nothing...
Musiałbym wtedy kopiować tekst do innego edytora, tam usuwać entery i wrzucać przecinki, a później w Excela. Problem polega na tym, że chcę tego uniknąć, bo niektóre opisy są obszerne, a produktów 24.000 i do każdego opis jest inny. Może ktoś zna jakieś makro na pomijanie styli tekstu przez Excela? Dodano po 34 Temat rozwiązany. Sposób miałem prosto...
Zrobiłem bez makr. Może ktoś Ci przerobi na makro. Łącze do formantu w komórce bieżącej, formatowanie niestandardowe ukrywające wpis ;;; formatowanie warunkowe określające kolor. Niestety łącza nie dają się kopiować, bo są zawsze adresami absolutnymi, nawet jeśli się je zapisze bez dolarów.
Dla kolumny A: A1=1 reszta komórek w kolumnie funkcja: =JEŻELI(NIE(B2="");A1+1;"") EDIT: Oczywiście co do funkcji to dale komórek: A2 = JEŻELI(NIE(B2="");A1+1;"") A3 = JEŻELI(NIE(B3="");A2+1;"") A4 = JEŻELI(NIE(B4="");A3+1;"") A5 = JEŻELI(NIE(B5="");A4+1;"") itp. wystarczy wypełnić serią.
Cześć, Czy ma ktoś wiedzę jak wykonać to co niżej opisuje? Chcę aby po najechaniu na komórkę lub ewentualnie po kliknięciu jej, inna komórka zmieniła kolor swojego wypełnienia lub kolor czcionki. Z góry dziękuję za podpowiedzi.
Używam E2007 i u mnie działa. Spróbuj podmienić na Range("K5:H7,I10:I11,I1... = True Nie pamiętam, czy miało być: i10:i13? Możesz też próbować umieścić ją na samym początku (przed wypełnieniem nagłówków). Po tej linii można dać wyśrodkowanie w pionie (chyba brakuje) Range("I10").VerticalA...
Można też bez formuł: Sposób 1: W komórce A1 wpisujesz dzisiejszą datę (nie używasz formuły DZIŚ() ), w A2 datę za miesiąc. Zaznaczasz obie komórki, najeżdżasz kursorem na prawy dolny róg zaznaczenia (kursor zmieni się w czarny krzyżyk) i z wciśniętym lewym przyciskiem myszy przeciągasz zaznaczenie o tyle komórek ile potrzeba. Sposób 2: W komórce A1...
Widzę, że dopracowałeś trochę arkusz. Dopisałem funkcje która zmienia kolor wypełnienia komórki w przypadku "przeterminowania" zadania. Sprawdzane pod kątem niedotrzymania terminu są tylko zadania niewykonane (oznaczone czerwoną czcionką). W arkuszu jest skoroszyt z kodami kolorów, jak otworzysz makro są tam komentarze i jest napisane którą liczbę trzeba...
Dodaj dodatkową kolumnę, wypełnij ja liczbami losowymi (funkacja LOS() lub RANDBETWEEN() skopiowana od góry do dołu), posortuj po tej kolumnie i na koniec usuń dodatkową kolumnę. Pozdr!
Z kolumną J jednak nie dokonca jest w porządku ponieważ aktualizuje komórki aż za tabelkę To można zakres wziąć z kol H (czyli J wypełni do L.p 10) [syntax=vbscript]Range("j8").AutoFill Range("J8:J" & Range("H" & Rows.Count).End(xlUp).Row), xlFillSeries[/syntax]
Np jeśli zmienie kolor wypełnienia komórka B5 to automatycznie zmieni mi się w X5 i AT5
Dzień dobry Też myślałem nad makrem, lecz to dla mnie za wysokie progi. Znalazłem jedno marko, lecz działa tylko na jednym "kółku". "Kółka" mają mieć wypełnienie czarny gdy wartość w komórce A1 jest równa odpowienim numerem "kółka", pozatym brak wypełnienia lub wypełnienie białe. Byłbym wdzięczny za pomoc. Pozdrawiam Tomek
Jeśli w Excelu używasz funkcji ŚREDNIA do zakresu komórek, to Excel bierze pod uwagę tylko komórki wypełnione liczbami. Nie przeszkadzają mu komórki puste ani komórki z tekstami. Przeszkadzają tylko błędy, bo to uniemożliwia obliczenie. Więc jeśli za każdym razem potrzebujesz tylko bieżącą średnią, to możesz użyć pełnego zakresu z zapasem i stopniowo...
Dzień dobry, Rozumiem, że te formuły mają wypełnić całą kolumnę A, tak? Można zrobić tak: 1) zmienić odwołanie w komórce na względne, tzn. [syntax=text]=[arkusz1.csv]Arkusz1!$A2[/... Chodzi o to, żeby przed dwójką nie było znaku $. Przed A może być lub nie, bez znaczenia 2) kliknąć literę A nad kolumną, zaznaczy się cała kolumna 3) kliknąć w linii...
Po modyfikacji Sub wypełnij() koniec = Range("D1").End(xl... Application.ScreenUpdating = False For i = 3 To koniec If Cells(i, 5) = "" And Cells(i, 4) <> "Suma końcowa" Then Cells(i, 5) = Cells(i - 1, 5) End If Next Application.ScreenUpdating = True End...
Kombinujesz "jak koń pod górę" :| Ale Twoja wola - można częściowo wypełnić stawiane wymagania poprzez funkcję typu: 754106
W pętli For i = … zmienna sterująca musi być liczbą, a u Ciebie były to odwołania do komórek. Spróbuj tak: [syntax=vbscript]Sub FillCol() Dim start As Long, fin As Long, i As Long start = Range("B" & Cells.Rows.Count).End(xlUp).Row + 1 fin = Range("A" & Cells.Rows.Count).End(xlUp).Row For i = start To fin Range("B" & i) = "XXX" Next i End Sub[/syntax]
Możesz użyć np. Licz.puste(), licz.warunki() z funkcją jeżeli i w zależności od wyniku odpowiednio formatować. Nie do końca rozumiem gdzie ma się zmieniać kolor czcionki i gdzie ma sprawdzać wypełnienie (wiersze, kolumny czy cały zakres), nie załączam więc przykładu.
Dlatego napisałem, że jest to narzędzie niedoskonałe. Ono nie reaguje od razu, jak formatowanie warunkowe. Trzeba je uruchomić ponownie, wtedy się wynik zaktualizuje. Czyli nie można go włączyć na początku i oczekiwać, że w miarę wprowadzania danych obwódki same będą znikać. Można wypełnić co jest do wypełnienia i dopiero pod koniec włączyć to zakreślanie....
Są różne sposoby na znajdowanie ostatniego pustego wiersza, mój ulubiony jest taki: widoczną komórkę w kolumnie B wypełnioną tekstem, idąc od ostatniego wiersza w górę. Liczba 1048576 to ostatni wiersz excela 2007, dla kompatybilności z 2003 należało by użyć 65536. Przed wykonaniem sprawdzania poleceniem ShowAllData próbuje się zdjąć kryteria autofiltra...
Witam. Problem polega na tym, że nie można wypełnić pól kolorami (Excel XP). Są one (kolory) widoczne tylko przy wydruku, jednak tez nie do końca, bo są to różne odcienie szarości. Jak naprawić ten problem?? Proszę o pomoc. System Windows XP Office XP
Bardzo fajny efekt można uzyskać wstawiając obrazek w pole komentarza. 1.Wstaw komentarz 2.Edycja/Formatuj komentarz/Kolory i linie/Efekty wypełnienia/Obraz
Skoro nie podejmujesz się analizy to skąd wiesz że nie liczy unikatowych wystąpień? Ja ją przetestowałem i liczy tak jak trzeba, z tym że liczy też osoby które mają wypełnioną tylko jedną komórkę tj. imię lub nazwisko. A chciałbym żeby excel pomijał taką osobę. Niestety ja z kolei nie za bardzo kumam funkcji bd.ile.rekordów.a. Ale biorąc pod uwagę twoją...
Witam wszystkich. Czy w EXCEL jest możliwe co takiego? 1. Mamy arkusz 1 w którym w komórce a1 wpisany jest tekst lub cyfra z odpowiednik wypełnieniem kolorem. 2. Myk polega na tym, żeby tę wartość przenieść automatycznie / odwołanie do arkusza 2 do komórki a1 ale w taki sposób, żeby było takie samo wypełnienie kolorem. 3. TZN. jak zmieni się cyfra lub...
No to troszkę się zdziwiłem, bo .... każdy kwadrat jest prostokątem, czyli jeśli ktoś zaznaczy 3x3 to też będzie dobre zaznaczenie. ( a... nie każdy prostokąt kwadratem ) Sądzę ( ale mogę się oczywiście mylić - jak każdy :D ), że to tylko tak sformułowane zadanie. Czyli nie musisz robić warunku na wiersze<>kolumny, bo Cię facet może pogonić za...
A takie rozwiązanie jak w załączniku? Trochę objaśnienia. W komórce A2 wpisujesz datę. Ciągnięcie za prawy dolny róg komórki powoduje wypełnienie datami kolumny. W komórkach obok masz wpisane zmiany. Zaznaczasz obszar grafiku i klikasz podwójnie na prawy dolny róg zaznaczenia. Reszta zrobi się sama.
w skopiowanym bloku przenosiły się tylko wartości nagłówków oraz wartości z komórek z wypełnieniem koloru zielonego. Reszta komórek winna być pusta. Czy to znaczy, że chcesz cały blok oczyścić również z wszystkich formuł :?: :D
Witajcie. Zatrzymałem się na problemie zmiany aktywności komórki po wypełnieniu powyższej. opis.: pistoletem zaczytywany jest numer barcode do komórki B1 chciałbym aby po wypełnieniu komórki b1 uaktywniła sie komórka b2 , skanuje pistoletem, wpisują się dane do b2 i kursor ustawia się na b3 itd. Kiluk
Niestety nie - VBa pamiętam ze szkoły ale to się skończyło na takich rzeczach jak Excel Komórka 'a' ma wartość między 1-10 to wypełnij jej kolor .... jak co innego to inaczej itd.. taki poziom takich zadanek a na koniec "kursu" prosty kalkulatorek w VS VBA W sumie jak potrzeba zdobyć odp. na konkretny problem w VBA PP to mógłbym napisać na StackOverFlow...
W przykładowym arkuszu Excel jest 100 kart ponumerowanych od 1-100. W każdej karcie w komórce A1 jest cyfra. Jak automatycznie wypełnić komórki w kolejnej karcie (np.101) (najlepiej przez przeciągnięcie wskaźnikiem myszy) aby wartość komórki A1 odpowiadała wartości komórki A1 z karty 1, A2 odpowiadała wartości komórki A1 z karty 2, A3 odpowiadała wartości...
Zakładam, że Jan Kowalski to ta sama osoba, ale dane mogą pochodzić z różnych okresów (tutaj to nie ma znaczenia aż takiego). Mi chodzi o to, aby dane nie zostały utracone, tzn. w jednym wierszu Jan Kowalski ma podane stanowisko a w drugim już nie ma, zatem usuwając jeden wiersz tracę pewne informacje, a ta funkcja usuń duplikaty nie scali wierszy w...
cześć jakiś pomysł jak dodać do tabeli autonumerowanie? Począwszy od komórki A5 potrzebuję ponumerować wiersze z danymi, które zaczynają się zawsze od B5. Czyli, jeśli w zakresie (""B5:B") znajduje się coś, to znajdź ostatnią wypełnioną komórkę w kolumnie B i przypisz autonumerowanie w zakresie ("A5:ostatniej wypełnionej komórki obok"). Pół sukcesu...
niby działa ale zeby zobaczyć wynik trzeba zaznaczyc komorke. Ja to widzę tak: zaznacz zakres do ostatniej pełnej, potem dodaj i pokaz i wypełnij wynikiem do ostatniej pełnej / względnie ostatniego pełnego wiersza. any ideas?
Pokaż co do tej pory zrobiłeś, wklej plik arkusza. Zerknij na podobne tematy na forum (tylko kilka wybranych, opcja SZUKAJ da znacznie więcej wyników): [url=http://www.elektroda.pl/rtvforum/to... czasu pracy w Excelu - jak obliczyć? [url=http://www.elektroda.pl/rtvforum/to... - obliczanie w/g wyszukanych kryteriów...
Witam, mam mały problem z poniższym makrem - dokładnie ze zmienna2 Chcę aby na podstawie zadeklarowanej komórki (rodzaj_kredytu) excel automatycznie wypełnił wiersze w dół: 1. w przypadku rat równych lub malejących miesiącami 2. W innym przypadku dniami Niestety zawsze wypełnia mi dane dniami. Czy ktoś może zerknąć co robię źle? [syntax=vbscript] Dim...
Niestety nie umiem tego zastosować. Daje wycinek tego co bym chciał mieć zrobione tzn. pola i daty w chwili obecnej powinny tak sygnalizować mi terminy niestety to tylko wypełnienie komórki bo nie wiem jak te pola sformatować formułą.
Cześć, Czy jest to możliwe w Excelu i jak to zrobić? Potrzebuję zrobić formularz w Excelu. W tym celu stworzyłem listę rozwijaną z kilkoma tekstami które można wybrać. Chciałbym, aby po wybraniu danego tekstu z listy, w kolejnym zeszycie zaznaczyły mi się konkretne komórki (na kolor żółty), które dana osoba musi wypełnić. Czyli w zależności jaki tekst...
Potrafię jedynie skopiować kod i ew. go lekko przerobić aby znalazł zastosowanie dla mojego problemu. Twój opis jest nieprecyzyjny, a pliku przykładowego brak :cry: Skoro potrafisz przerobić makro to możesz zmodyfikować kod reakcji arkusza na wypełnienie komórki, oraz reakcji po doubleclick na widoczność komórki :spoko: 1037212
Dzięki serdeczne za zainteresowanie się tematem. Przepraszam, że byłem mało precyzyjny. Po wstępnym przeczytaniu wydawało mi się, że wszystko jest OK. Teraz gdy czytam Twoje pytania, to widzę, że tak nie jest. 1. Po wpisaniu wartości większej niż 0 w zakres kolumn D do O (bez ukrytych) wpisywana jest wartość 9 i zmienia się kolor komórki na zielony...
No taaak, są to moje wielkie początki VBA :) A czy nie ma przeszkód jeśli wartość szukana (czyli ta liczba PESEL) jest w tej samej kolumnie którą przeszukujemy? Edit: Sprawdziłem - działa nawet gdy liczba szukana jest w tej samej kolumnie: PESEL = WorksheetFunction.CountIf(Range(... Range("B1").Value)...
A co w momencie gdy pod wierszami, które mają być uzupełnione są inne dane? Mam w arkuszu tabelkę, w której musze uzupełniać pewne dane. Tak samo jak u poprzedników, nie wiem ile będzie miałą wierszy w kolejnych plikach. Po użyciu row.counts wyświetla mi się błąd, że wszystkie komórki muszą być w tym samym rozmiarze (zaraz pod tabelą jest długa, scalona...
Witam, W załączonym przykładzie w pliku Excel mam dwa arkusze: Dane oraz Tabela. W arkuszu Dane mam wstawioną tabelę z danymi, która jest na bieżąco uzupełniana przez różnych użytkowników. W arkuszu Tabela mam wstawioną tabelę przestawną która prezentuje dane z podziałem na osoby odpowiedzialne za dany temat i przyporządkowanymi jej tematami. Bardzo...
Witam, staralem sie przejrzec forum w celu znalezienia odpowiedzi, ale niestety nic co znalazlem nie pasowalo do konca do mojego zapytania. Chodzi mi o zalozenie filtra na konkretna kolumne (zalozmy W), ktory bedzie filtrowal komorki od W4 do ostatniej zapelnionej w kolumnie W W tej chwili mam [syntax=vb]ActiveSheet.Range("$A$3:$AH$2...
Proponuję zerknąć do działu [url=http://www.elektroda.pl/rtvforum/fo... Software jest tam wiele tematów o grafikach w Excelu. Można założyć swój temat, zawsze ktoś pomoże. Kilka przykładów: [url=http://www.elektroda.pl/rtvforum/to... w excelu, zliczanie czasu pracy, godzinowka [url=http://www.elektroda.pl/rtvforum/to...
Cześć, Mam następujący problem. Moja formuła ma zaciągać z innego arkusza dane. W pierwszej komórce ma zachodzić działanie A1/B1, w drugiej C1/D1, trzeciej E1/F1 etc dokąd się da. Pytanie brzmi czy można przeciągnąć tą formułę w poziomie tak, żeby nie trzeba było ręcznie uzupełniać tych adresów? Dotąd jak wypełnię 3-4 kolumny i przeciągnę to kolejne...
witam, bardzo proszę o pomoc przy stworzeniu formuły, która pozwoli przyporządkowac dane. załączam plik przykładowy. w arkuszu1 znajduje sie lista nazwisk osób oraz komórki w kolumnach do uzupełnienia. w arkuszu2 znajdują się dane, które chciałbym aby wypełniły puste komórki w arkuszu1. bardzo prosże o pomoc. próbowałem z funkcjami wyszukaj ale niestety...
Jedynki właśnie nie trzeba odejmować. W poprzednim kodzie był błąd. Metoda End(xlUp) wskazuje pierwszą wypełnioną komórkę (idąc od dołu arkusza). Ponieważ w kolumnie A komórki są scalone, pierwszą wypełnioną jest górna komórka obszaru scalonego. Jeśli odejmiemy 1, to ostatni obszar scalony nie będzie uwzględniony przy sortowaniu. Jak będzie więcej wierszy...
hohoho, wreszcie mam kompa z excelem, ale doprawdy nie rozumiem o jakie rozwiązania Ci chodzi. użyłeś dokładnie tego co zaproponowałem, przy czym skomplikowałęś sprawę bo nie ma konieczności wyświetlania wyniku (tablicowej jak słusznie zauważyłeś) funkcji frequency. zakładając że dane są w kolumnie a, to po wypełnieniu kolumny b w moim przypadku liczbami...
Witam, Potrzebuje pomysłu na uproszczenie swojej pracy. Chodzi o uporządkowanie tabeli, którą wklejam do Excela. Teraz używam filtrów i kopiuję ręcznie do odpowiednich komórek. Może ktoś chciałby sie podzielić wiedzą na temat VBA dla Excela. jak ugryźć aby za pomocą magicznej różdżki, Pan Excel wypełnił za mnie tabelkę. Tabela wklejana do Excela ma...
Jesli nie bedzie szukac dalej. Czyli chcesz formułę (funkcję użytkownika), która znajdzie pierwszą komórkę bez wypełnienia kolorem, z niezdublowaną wartością we wskazanej kolumnie/zakresie. Coś w rodzaju =NOMINAL(Payments!H:H), =NOMINAL(Payments!H100:H120), itp?
Dzięki koledze adamas_nt i jego sugestii co do "automatycznego" pobrania numeru kolumny (i wiersza w domyśle) poprawiłem nieznacznie moje makro. Wystarczy teraz wkleić w arkusz "dane" gdziekolwiek twoją tabelę z danymi (jak by ona nie wyglądała). Nacisnąć wstaw kody i kody wewnętrzne zostaną wstawione bez względu na to gdzie znajduje się tabela z danymi...
Witam, mam problem z autowypełnianiem komórek. Posiadam 2 kolumny z następującymi danymi: Kolumna A: Materiał 1 Materiał 2 Materiał 3 ... Materiał 1000 Kolumna B: Materiał A Materiał B Materiał C ... Materiał Z Chciałbym kolumnę C wypełnić powyższymi danymi w następującej kolejności: Kolumna C: Materiał 1 Materiał A Materiał 2 Materiał B Materiał 3...
Witam, Jeśli chodzi o problem nr 1, może ktoś inny pomoże, bo mi przychodzi tylko na myśl VBA :), chyba że przyjmujesz do wiadomości posiadanie makr w tym arkuszu. Problem 2 jest dość prosty do rozwiązania... Jeśli chcesz mieć dokładnie w formacie np. 01.2010, robisz prawoklik na kolumnie A, wybierasz formatuj komórki, Niestandardowe i w Typ wpisujesz:...
Właśnie w taki sposób miałem to zrobione wcześniej, ale było mało wygodne. Misternie wykonana ramka, która zostawiała w środku 3 koła bez wypełnienia, a pod nimi komórki z formatowaniem warunkowym. Niestety przy drobnych edyckach wszystko sie rozjeżdżało i robiło problemy...
excel wypełnić kolejny komórka wypełnić komórka excel komórka cyfra
usterka napędu bramy silnik wymiana tablicy rozdzielczej różnicówka różnice
viano drzwi ciśnienia oleju renault trafic
Obudowa pilota FAAC XT2 - wymiana i specyfikacja Aplikacja MusicCast nie widzi dysku komputera z muzyką - rozwiązania