Ewentualnie przerobić pętlę na funkcję użytkownika, którą umieszczasz w module Public Function Odwolanie(kom As Range, lng As Integer) Odwolanie = Mid(kom.Formula, 2, lng) End Function I używasz jak zwykłej funkcji Excela tzn =Odwolanie(komórka;ile znaków) Np w D1 wpisujesz: =odwolanie(C1;10)
Użyj funkcji: =LICZ.JEŻELI(zakres1:zakres2;"tekst") zakres1 - adres komórki zakres2 - adres komórki "tekst" - wyraz, który występuje w komórkach a ma być zliczony
Wpisz w wybranej komórce: =HIPERŁĄCZE("#Arkusz1!C10"... "Kliknij aby skoczyć") Gdzie Arkusz1 i C10 to przykładowy adres celu.
Rozbudowałem Ci to makro tak, żeby uwzględniało operacje na kilku komórkach jednocześnie, ale nie zmieniałem zasady jego działania. Więc jeśli zależy Ci na historii wszystkich komórek, musisz przestrzegać pewnych reguł. Makro działa w ten sposób, że po zaznaczeniu komórki/komórek zapamiętuje ich zawartość i adres (procedura SelectionChange). Następnie...
apollinaris , dałeś taki przykład, że trudno się zorientować jakiego wyniku oczekujesz. Czy czas w kol. C będzie zawsze taki sam tzn. 10:45, czy będzie zmienny i kolory mają być dopasowane proporcjonalnie? Jeśli zmienny to adres używany w formule musi zawierać nr wiersza bez znaku $. I zawsze piszemy formułę dla pierwszej komórki zakresu formatowania....
Muszę tylko rozszyfrować najpierw tą formułę =JEŻELI(SUMA($G$4:G4)+ADR.POŚR("grafik!"... W załączeniu masz przykład tej samej funkcji ale bez szukania danych w innym arkuszy (tak jakbyśmy mieli stałe dane bazowe i nie...
Jest tu faktycznie niekonsekwencja. Zakres B3:K13 liczy 10 kolumn i 11 wierszy. Inny sposób rozwiązania. Zdefiniować nazwę "zakres" wg wzoru: [syntax=text]=PRZESUNIĘCIE(ADR.POŚR(KOMÓ... przykładowy zakres obejmuje 5 wierszy i 3 kolumny. To sobie poprawisz tak jak chcesz. Początek zakresu ustalasz ustawiając kursor (komórkę...
Da się formułami, wystarczy użyć formuły wyszukaj.pionowo, a adres komórki podaje się w formie: 'E:\1\[Test.xlsx]Arkusz1'C3 gdzie: E:\ - dysk/partycja, na której znajduje się plik Test.xlsx 1 - folder w którym znajduje się plik Test.xlsx Arkusz1 - arkusz z którego pobiera dane C3 - komórka z której pobiera dane W przypadku gdy plik źródłowy jest w tym...
Właściwość ControlSource textboxa ustaw na adres komórki, np. Arkusz1!A2 (uwaga: działa w dwie strony, tj. zmiana wartości w textboxie zmieni wartość w Excelu, chyba że dasz go tylko do odczytu)
Nie znam Open Office'a ale może najprościej byłoby wpisać do komórki WZ 1, do komórki obok (po prawej) wpisać =lewa&"/3", gdzie "lewa" oznacza adres komórki z lewej strony, po czym zaznaczyć obie komórki i przeciągnąć w dół. Myślę, że to jest na tyle proste, że zadziała w każdym przypadku. Potem można ewentualnie zamienić wyniki na wartości i usunąć...
Korzystam z podobnego rozwiązania ale potrzebne jest też formatowanie warunkowe (aby zaznaczać tylko zakres wiersza). Zaznaczanie aktywnego wiersza za pomocą formatowania warunkowego i VBA 1. Zaznaczanie aktywnego wiersza Definiujemy nazwę: AktywnyWiersz=0 Wpisujemy formułę w VBA w sekcji Worksheet - SelectionChange Private Sub Worksheet_SelectionChange(ByVal...
Zaznacz obszar z datami, o który chodzi. Następnie na wstążce wybierz Narzędzia główne -> Formatowanie warunkowe -> Nowa reguła... Na liście wybierasz ostatnią pozycję "Użyj formuły do określenia komórek, które należy sformatować" Wpisujesz formułę "A1<dziś()" przy czym zamiast A1 wpisz adres komórki najbardziej po lewej i na górze z zaznaczonego...
Dobry wieczór, Miał być przykład, ale się nie doczekałem. Można zdefiniować funkcję użytkownika np. taką: [syntax=vb]Function Tło(adr As Range) As Integer Application.Volatile Tło = -CInt(adr.Interior.ColorIndex <> xlColorIndexNone) End Function[/syntax] Funkcja pobiera adres komórki jako argument i zwraca 0 jeśli komórka nie ma zdefiniowanego...
Propozycja kodu w VBA jest bardzo zgrabna, ale Excel też nie jest bezsilny wobec takiego problemu, tylko trzeba użyć formuły tablicowej, np. takiej: =SUMA(JEŻELI(MOD(NR.KOLUMNY(zakres1)-NR.... Formułę zatwierdzamy przez Ctrl+Shift+Enter. Znaczenie oznaczeń: zakres1 = zakres komórek od pierwszej do przedostatniej zakres2...
Mam problem z dopisaniem do Arkusza1 (WuZetka) do komórki E9 kontrahenta wybranego z Comboboxa. Pewnie dlatego, że pod przyciskiem WSTAW nie masz żadnego kodu... ;) Wstaw go - kod będzie podobny do tego, który podałem jako ostatni, a nawet prostszy, bo znasz adres komórki, do której chcesz wstawiać. Dlaczego lista kontrahentów jest inna niż towarów....
1. Załóż filtr w oryginalnej tabeli (niepuste) -> zaznacz całą tabelę i wtedy dopiero kopiuj dane . Może nawet lepiej wklejać "tylko wartości" niż dane z pełnym formatem każdej kopiowanej komórki. Zrobisz to w jednym ruchu zamiast korzystać z pętli (2000 razy). Po nagraniu makra można edytować zaznaczony zakres tak, żeby najlepiej nam odpowiadał. 2....
Czy istnieje jakiś sposób, aby dostać adres aktualnej komórki. Tzn. chodzi mi o to, żeby w komórce A1 było wpisane A1, w B2 B2 itd. Czy istnieje jakaś zmienna, która po przechowuje? Próbuję w ten sposób rozwiązać następujący problem: Mam tabelkę, w której niektóre kolumny i wiersze są sumami pozostałych i one są chronione, a ja nie znam hasła. Dzielą...
Wstaw w kod arkusza "Wydatki" i kliknij w "Zapisz" [syntax=vb]Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim ostWrs As Long 'warunkiem działania makra jest adres scalonej komórki (tej z tekstem "Zapisz") 'zwrócony przez zmienną Target If Target.Address(0, 0) = "E18:E19" Then 'sprawdzamy, czy wymagane pola są wypełnione /przy okazji...
można zrobić i funkcie któras będzie działała jak inne funkcje excela (np suma() z tym że za każdym razem przy wejściu do takiego pliku excela będzie monit o makro. Przyznam że nie jestem za dobry w makrach ale poprzez logiczne myślenie :) coś takiego stworzyłem Function KOMENTARZ(a As Integer, b As Integer) As String KOMENTARZ = Cells(a, b).Comment.Text...
Witam, Jezeli ma Pan dane z kilku miesięcy i chce Pan sumować przedziałami, to posługując się funkcją SUMA.JEŻELI musi Pan zawsze uwzględniać różnice sum, na przykład jak chce Pan liczyć luty, to trzeba wziąć wszystko co było przed 1.03. i odjąć od tego to, co było przed 1.02. itd., na przykład: =SUMA.JEŻELI(B:B;"<2013-03-01";C:C)-S...
Przyjrzałem się bliżej danym w pierwszym arkuszu i... mamy tam parę "kwiatków". Dane nie są spójne, ale ogólnie nie jest źle. Znalazłem ze 4 wyjątki, które na szczęście "mają regułę". Np: http://obrazki.elektroda.pl/2132347100_1... http://obrazki.elektroda.pl/4068974900_1... Adres też zapisany jest różnie, od lewej: "ul",...
Problem wydaje mi się trochę udziwniony, bo jeżeli minuty są potrzebne, to dlaczego nie ma być zer gdy są tylko pełne godziny? Dwukropek oczywiście można zastąpić przecinkiem, tylko czy to jest lepsze? Wszak minuty nie są setnymi częściami godziny. Natomiast format czasu nie jest tak elastyczny, żeby można było pominąć minuty gdy są równe 0, a wyświetlać...
Dzień dobry, Chciałem się włączyć do dyskusji, chociaż trudno zaproponować szybkie rozwiązanie przy tak dużej liczbie danych. Nie chcę proponować VBA, są pewnie lepsi od tego specjaliści, natomiast formuły Excela można na pewno zoptymalizować. Ale najpierw pytanie, czy w przykładzie kolumna I w arkuszu "wynik" zawiera spodziewany wynik? Warunek jest...
Wszystko zależy od tego, w jakim formacie będziesz miał dane, które dostaniesz. W przykładzie jest to x, y, z, x, y, z na przemian. To by oznaczało, że już przy pierwszym pytaniu pojawią się wszystkie nazwiska, jeśli nic się nie zmieni. Możesz skopiować te nazwiska (jednokrotnie, tak jak w arkuszu na drugiej stronie) i wkleić je tam, gdzie być mają....
Tak, da się coś takiego zrobić. Daj przykład jakiegoś tekstu. Domyślnie z tego co pamiętam jeśli tekst jest ciągiem znaków bez enterów to powinno się to wklejać do jednej komórki.
1. Zmienne te muszą być liczbami, np. musi być: kol_pocz = 1 wiersz_pocz = 1 kol_fine = 27 ' (27 jest nr kolumny "AA") wiersz_fine = 100 2. "ZZ" - nie ma takiej kolumny (excel 97). 3. Makro to dla dużych zakresów będzie liczyło bardzo długo (musi przejść wszystkie komórki) 4. Należy usunąć wywołanie okien INPUTBOX i zmiennych z nim związanych (lub poprzedzić...
Niestety nie. Tabela wygląda mniej więcej tak: Nazwa części 1 1.1 ZXCVZ 1.2 ... Nazwa części 2 2.1 FFSS 2.2 ... Dodatkowo są z niej usuwane lub dodawane wiersze Chodziłoby mi o możliwość wpisywania adresów komórek w postaci zmniennych np. =A(WIERSZ()-1) co oznaczałoby komórkę o jeden wyżej od aktualnej. Czy jest możliwy tak zapis i w...
Przejrzyj dobrze kod. Ostatnią funkcję masz "zaremowaną". [syntax=vb]'Call GetOnlyGoodValues(x1, x2, x3, x4, x5, x6, x7, x8, x9)[/syntax] Wewnątrz GetOnlyGoodValues wykonywane jest przeszukiwanie. Działa to dobrze bo sprawdzałem, ale generowanie czegokolwiek trwa baaaardzo długo. Zapis do komórek Excela mija się z celem o czym już pisałem. Właśnie dodałem...
Funkcja ADR.POŚR wymaga, aby plik, którego adres jest obliczany był otwarty. W samym Excelu nie ma możliwości odczytu z zamkniętego pliku, którego nazwa byłaby zmienna. Można zrobić coś w tym kierunku z pomocą VBA, ale nie wiem, czy możesz go używać. Jeśli jesteś zainteresowany takim rozwiązaniem, to napisz jeszcze, czy te nazwy plików są zupełnie dowolne,...
W "Arkusz2" w komórkach B2-D2 umieściłem liczby 12, 13, 14. http://obrazki.elektroda.pl/8196412400_1...
Dzięki za podpowiedź. Teraz jak to uruchomić, aby działało w pętli. Chciałbym, aby formuła działała w pętli, tj aby dla zmieniającego się parametru do zakresu B2:B5 pobierane były kolejne zawartości do C2:C5, D2:D5,...., G2:5. Dla mnie cały szkopuł sprowadza się do tego jak zapisać adres komórki, aby zależnie od zmieniającego się parametru (względnego...
Przypisuj jako dwie zmienne w postaci stringu. Podstawiaj jako nazwy. Np ark= ActiveSheet.Name 'nazwa obiektu rng= ActiveCell.Address 'nazwa zakresu odwołanie: Sheets(ark).Range(rng)
wracając do powyższego, chciałbym zrobić tak że jak znajdzie się wpis np "KV" w kolumnie B:B to odwoła się do konkretnej komórki. Wstępna ocena dostępnych informacji Użytkownik pragnie rozszerzyć istniejącą formułę Excel, aby w przypadku znalezienia wpisu "KV" w kolumnie B:B , formuła odwoływała się do konkretnej komórki. Aktualnie korzysta...
Plik robi wrażenie uszkodzonego. Wydaje mi się, że był przeciążony. Excel to jednak nie jest baza danych. Ostatnia komórka ma adres HZK7665. Co tam było w tych kolumnach? Tysiące komórek mają ustawione komunikaty sprawdzania poprawności. Im większy plik tym większe prawdopodobieństwo awarii. To niczego nie wyjaśnia, ale nie potrafię określić przyczyny...
Chcę zrobić odwołanie do komórki żeby po kliknięciu przechodziło mi pod wskazany adres Adres komórki uzyskuje tak: =JEŻELI.BŁĄD(ADRES(PODAJ.POZYCJĘ... Funkcja zwraca adres komórki np D580 - chciałbym zrobić odnośnik w tym miejscu ale nie przenosi mnie w wybrane miejsce Ponadto chciałbym wyszukać...
Dzięki za zainteresowanie moim tematem. Sam kod zapisywania się wykonuje. Pojawia się okno zapisu tak jak powinno. Problem mam z tym, że w pasku, w którym wpisuje się nazwę pliku, nie pojawia się wartość z komórki określonej w kodzie (arkusz "ilości", komórka P1). Komórka ta zawiera formułę. Może to ma znaczenie? Cały skoroszyt jest zapisany w formacie...
Witam. Problem w zasadzie podstawowy, kiedyś pamiętałem jak to robić ale teraz to już nie pamiętam... :) W kolumnie A mam wartość zmienną, w komórce B1 stałą, w kolumnie B chce uzyskać iloczyn wartości z sąsiedniej komórki A i B1. Normalnie nie było by kłopotu bo można wpisać =A1*[wartość stałej] ale tu stała podlega zmianom ok 2 razy dziennie. Nie...
W jaki sposób mogę skopiować obszar komórek, tak żeby adresy odnośników w wpisanych formułach zmieniły się na nowe. Chodzi mi o to, żeby zmieniły się tak jak np przy przesuwaniu zaznaczonych komórek, wtedy wszystkie odnośniki zmieniają adres na miejsca do którego się przeniosły komórki do których się odnosiły. W załączniku jest plik o który mi chodzi,...
Z użyciem VBA można to zrobić stosunkowo łatwo, tylko rozwiązanie wymaga adaptacji, gdy zmienią się zakresy danych. W Twoim pliku możesz zastosować taki kod obsługi zdarzenia Change: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address <> "$D$1" Then Exit Sub Application.EnableEvents = False Range("D1").Value...
Możesz zastosować taką funkcję UDF: [syntax=vbscript]Function Biale(rng As Range, pat As Range) As Long Application.Volatile Dim cel As Range For Each cel In rng If cel <> "" And cel.Interior.Color = pat.Interior.Color Then Biale = Biale + 1 End If Next cel End Function [/syntax]Funkcja powinna być umieszczona w module uniwersalnym. Pierwszym...
Nie musisz robić Select, po prostu w Range wpisujesz adres komórki i możesz z nią robić co chcesz.
Witam, od niedawna próbuję pisać proste makra ale teraz przede mną cięższy temat... Mam plik excel . Kolumna A zawiera informacje o problemie, B - zadania do wykonania, C - termin, D - osoba odpowiedzialna na zadanie, E- adres mailowy tej osoby. Jest ook 100 wierszy z różnymi zadaniami. Za kilka działań może byc odpowiedzialna ta sama osoba. Czy istnieje...
Np http://obrazki.elektroda.pl/8469674000_1...
Dzień dobry, Można zdefiniować funkcję użytkownika działającą analogicznie do funkcji FORMUŁA.TEKST. Przykładowo treść funkcji można zdefiniować tak: [syntax=vb]Function TekstFormuły(kom As Range) As String TekstFormuły = kom.FormulaLocal End Function[/syntax] Argumentem funkcji jest adres lub nazwa komórki z formułą, wynikiem jest tekst formuły w wersji...
NR INWENTARZOWY UP/487/039/2020/ABC UP/487/040/2020/ABC jakiej funkcji użyć w excel aby numerować dalej tylko wartości 039, 040, 041 itd. Rozwiązałabym to na 2 sposoby, 1. dostawiła kolumnę pomocniczą i w kolejnej zrobiła formułę "=UP/487/"& [tu adres komórki z kolumny pomocniczej bez spacji po lewej i po prawej stronie] &"/2020/ABC" - tylko być może...
Mam problem z formatowanie warunkowym w Excelu 2010. Pracując wcześniej w wersji 2003 było OK. Przykład. Mam dwie kolumny z danymi liczbowymi. Powiedzmy w kolumnie A i B. Jeżeli wartość w kolumnie A1 jest większa niż B1 zastosuj formatowanie warunkowe np wyróżnienie kolorem czcionki. Wpisanie tej formuły jest OK, ale już skopiowanie tego formatowania...
Chciałbym aby po wpisaniu do komórki dla przykładu A1 np nazwiska , w komórce np B9 pojawiły się dane tej osoby np. adres lub inny dowolnie sformułowany przeze mnie tekst.Jakiej użyć formuły?
Dzięki po raz kolejny. Ukryłem krzaczki formatowaniem warunkowym. Na angielskojęzycznym forum wynalazłem formułę =ISERROR(tutaj wpisuję adres komórki z krzaczkami) ...i po kłopocie.
Formułami możesz to zrobić np. tak: [syntax=text]=JEŻELI.BŁĄD(INDEKS($A$1:$D... jest formuła tablicowa do komórki A11. Kopiujesz ją w dół jak długo będą wyniki. Szukany tekst jest w A10. Zwróć uwagę na sposób zapisu...
Jednak uwielbiam proste rozwiązania :) Wklej w kod arkusza wynikowego takie makro [syntax=vbscript]Option Explicit Option Compare Text Private Sub Worksheet_Change(ByVal Target As Range) Dim myPath As String, myFile As String Dim ark As String, rn As String, arg As String If Target.Address(0, 0) = "A3" Then myPath = "G:\TP\01. Administration\1.1 Work...
witajcie może ktoś z was pomoże poszukuje takie makro które z kolumny A wyszuka np numerek 3532 i jak go znajdzie to z wiersza oraz zadanych komórek kopiuje dane do notatnika z góry dzięki za pomoc Dodano po 1 jest progress , dziękuje a jeszcze mam prośbę jak ewentualnie skopiować komórki z tytułami przed wartościami dla przykładu jeżeli mam załóżmy...
adres komórki excel adres adres komórki zmienna
bt878 moretv drukarka bezpiecznik skaczące paski
kabel brake radio odłącznik anteny
Łóżko solaryjne 23 kW – czy bezpiecznik podlicznikowy 40A wystarczy? Analiza zabezpieczeń OpenPLi cron – konfiguracja busybox-cron i cronie, harmonogram zadań, przykłady wpisów
