= d6+"1:40" lub =d6+czas(1;40;0)
Zapewne problem tkwi w (partokrotnym) "sztywnym" odwołaniu do komórki $O$23 w formule. Skopiuj formułę do pierwszego wiersza. Zaznacz tą komórkę i bylejaką inną obok wciśnij CTRL+H i zamień $O$23 na komórkę gdzie masz "stałą" 24:00 np O2 ale pamiętaj o dolarach czyli $O$2. Następnie skopiuj tą komórkę z poprawioną formułą w dół. Myśle że jasno - jak...
Nie do końca jest to prawidłowe. (Już przez to przechodziłem :) ) Trochę niepotrzebnie zagmatwałeś funkcje niemniej zobacz, że ci nie będzie działać przy niepełnej dniówce która kończy się w kolejnym dniu rano. Poniżej kod który to "załatwia" ( ja mam inne kolumny - przesuniecie ? ) [syntax=vb] ark.Range("G" & r).Formula = "=IF(F" & r &...
Problem z tym kodem polega na tym, że gdy A2 jest zapisane to po wpisaniu C2 nic sie nie dzieje Powinno być. [syntax=vbscript]If Intersect(Target, Range("C:C")) Is Nothing Or Cells(Target.Row, 1) = "" Then Exit Sub[/syntax]
Nie wiem jak ostatecznie zdecydowałeś się to zapisywać, ale zasady są takie. Jeśli zastosujesz zapis tekstowy w rodzaju: [syntax=text]=JEŻELI(A3=8;"7:35";"")[/sy... wynik w postaci tekstowej, który nie nadaje się wprost do obliczeń. Jeśli zastosujesz zapis liczbowy typu: [syntax=text]=JEŻELI(A4=8;--"7:35";"")[/... ułamek określający...
Witam, czy jest możliwość zaznaczenia w excelu komórek, jeśli różnica w wartościach czasu między jedną, a drugą jest większa niż np. 3 godziny? Mam kolumnę z godzinami i chcę, aby komórka obok danej godziny była w jakiś sposób wyróżniona, jeśli różnica w czasie przekroczy 3 godziny. Póki co wstawiłem dodatkową kolumnę z wartością 03:00:00 i użyłem formuły...
Witam, Proszę o pomoc w następującym problemie (patrz załącznik): W kolumnie "E" pojawiają się dane liczbowe pobierane z Internetu. Po każdej zmianie danych, powinien pojawić się w kolumnie "C" czas informujący, o której godzinie nastąpiła zmiana. Gdy dane wpisuję ręcznie - "czas" pojawia się. Gdy dane są pobierane z Internetu - komórki w kolumnie "C"...
Witam, przeczytalem kazdy temat na forum zwiazany z obliczanie czasu pracy I albo wychodza jakies bledy nawet przy najprostszej formule albo w ogole nie chce obliczac nic, zagubilem sie a potrzebuje to zrobic niestety na jutro. działalo do momentu kiedy start pracy i koniec byl w tej samej dobie jednak kiedy start pracy byl powiedzmy 14:00 i koniec...
Jeżeli w A6 czas nie jest w sekundach tylko w ułamkach doby, to w F6 nie da się prościej zapisać. Natomiast w komórkach B6 i C6 można sobie wyliczyć minuty, czy godziny, co potrzeba, i dalej tego używać. Tylko to już są liczby w formacie ogólnym, a nie w formacie czasu. Format czasu to są zawsze ułamki doby, a to co widać w komórce, to "złudzenie",...
... to będzie nadal korzystanie z tabelki pomocniczej co już akurat czynię, natomiast miałem nadzieje że tego uniknę akurat tego jak widać nie przeskoczę... Nie bądź takim pesymistą. W tym przypadku to tylko odpowiednie rozbudowanie formuły. Na razie "nie wchodzę" w system ciągły ale (to co zauważył kolega walek) rzeczywiście tu nie ma świąt - więc...
Jak uważasz, ale osobiście wolałbym mieć wszystko pod ręką, w jednym arkuszu. W załączniku "po mojemu" z blokadą zakresu. W innym przypadku: w A1 wpisz =PRODUKTY!A1 i rozciągnij na zadany zakres, a w opcjach wyłącz wyświetlanie zer.
Masz dwa przykłady, wybierz sobie pasujący lub skoryguj pod własne potrzeby. 912573 Przyjrzyj się nazewnictwu przycisków, ale nie temu na samych przyciskach, tylko ich nazwom kodowym - w nazwie każdego z nich znajduje się nazwa tabeli, której dotyczy - to identyfikator: 912574
Stworzyłem apkę do pilnowania terminów oraz miejsce na historię napraw dla wszelkiego rodzaju maszyn – może się komuś przyda Cześć, Od dawna miałem problem z ogarnięciem wszystkich terminów dla pojazdów – auta, koparki, lawety. Przeglądy, ubezpieczenia, serwisy – wiecie, jak jest, zawsze coś wyleci z głowy, a potem stres albo dodatkowe koszty. Z tego...
dodanie takiego makra jak poniżej, nie wyświetla mi napisu "hello" Popełniasz błędy: - wprowadzając "prywatne makro arkuszowe" do modułu uniwersalnego :cry: , jeśli to samo makro wkleisz do modułu arkusza "zamówienia" i dokonasz zmiany treści komórki - zamiast ujętej tam formuły wprowadzisz tam 1 - to uzyskasz Twój pożądany efekt - "hello" :D ; - nie...
Zobacz Dim so As Long so = Sheets("Start").Cells(Rows.Count, "A").End(xlUp).Row + 1 Cells(so, 1) = so- 1 Cells(so, 2) = textbox1 Cells(so, 3) = textbox2 Cells(so, 4) = textbox3
Witam wszystkich, dawno nic nie robiłem w Excelu a zmienił się dość mocno. Sprawdzałem LITERY.WIELKIE i jak klikłem sobie to, to cały czas dziad od tego czasu gdu wpiszę - to mi zaznacza pola i próbuje na siłę wywalić formuły. Jak to wyłączyć ?? Obok paska z formułami mam ikonkę fuknkcji jak również potwierdź i anuluj czyli x Zamykałem Excela i dalej...
Pierwsza kolumna : 23/07/2014 07:00 (data i start godziny pracy) Druga kolumna: 7.46 (czas pracy w h) Drugi wiersz kolumna pierwsza jest wynikową dodania godziny rozpoczęcia pracy do czasu pracy ( stąd 7:00 + 7.46 = 23/07/2014 14:46) Jedyne czego potrzebuję to ustawić zakres liczenia czasu pracy tak by odejemował godziny od 18:00 do 7:00 od czasu pracy....
Możesz też skorzystać z funkcji & Piszesz formułę: =A1&" 8%" I przeciągasz w dół. Minus jest taki że otrzymany wynik jest interpretowany jako tekst i nie wykonasz na tym żadnych innych działań
[syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$C$2" Then Application.ScreenUpdating = False nw = Sheets("Baza").Cells(Rows.Count, "A").End(xlUp).Row + 1 Range("A2:C2").Copy Sheets("Baza").Cells(nw, 1).PasteSpecial xlPasteValues Range("A2").Select Application.CutCopyMode = False Application.ScreenUpdating =...
Można do tego wykorzystać makro zdarzeniowe, na przykład takie: [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) Dim cel As Range Application.EnableEvents = False For Each cel In Target If Len(cel) > 0 Then If Left(cel, 1) <> "'" Then cel.Value = "'" & cel.Value End If Next cel Application.EnableEvents = True End Sub...
[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...
Da się to zrobić w ten sposób: 1. wpisać dane kwota netto w kilka wierszy np od 2 do 5, 2. przeciągnąć formułę przeliczenia euro od wiersza 2 poza wiersz 5 o kilka (np 5) wierszy w dół. w miejscach gdzie nie było w wierszach danych kwot netto w kolumnie przeliczników pojawi się 0. 3. zaznaczyć obszar komórek z zerami i nacisnąć "del", nie poprzez usuń...
Chodzi o dodawanie godzin i minut z każdego dnia pracy. Np. takich: 11:47 12:12 11:05 11:35 11:05
Wszystko działa płynnie do momentu włączenia funkcji udostępniania arkusza (w tradycyjnej formie, Excel 2016). Mimo na pulpicie, ale piszesz że wszystko jest ok do momentu udostępnienia, Zrób to samo z maluśkim i większym plikiem. I się sam przekonaj udostępniając. Kiedyś znajomy nauczyciel zapisał cały arkusz excel i po czasie był zdziwiony że nie...
Liczba 0,01 ma nieskończone rozwinięcie binarne, więc przy wielokrotnym dodawaniu błędy zaokrągleń w pewnym momencie się ujawniają. Należy unikać takich działań. Bezpiecznie jest dodawać liczby całkowite, a wynik ewentualnie dzielić przez 100. A najlepiej tak zorganizować obliczenia, żeby wystarczał licznik całkowitoliczbowy, a ułamki wprowadzać do...
[syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$C$2" Then [A2] = [A2] + [C2] [C2] = Null End If End Sub [/syntax]
Sprawdź, czy o to chodziło.
W [syntax=vbscript]w = Cells(Rows.Count, "A").End(xlUp).Row + 1[/syntax] masz numer wiersza kolejnej wolnej komórki w kolumnie A, użyj go np. [syntax=vbscript]Cells(w, "A").Value = Date[/syntax]
Witam! Od czasu do czasu korzystam z VBA lub po prostu rejestruję proste makro, żeby ułatwić sobie pracę. Ostatnio natrafiłem na problem. Zarejestrowałem proste makro ułatwiające dodawanie kolejnych odczytów do tabeli w arkuszu, który jest częścią większego skoroszytu, ale innych makro w nim nie ma. Ku mojemu zdziwieniu okazało się, że makro czasem...
Chyba jednak się nie zrozumieliśmy... Załączam zrobiony na szybko załącznik ilustrujący ideę. Zależy mi na pominięciu okienka wyszukaj/zamień. Bo w tej chwili żeby powyższy sposób zadziałał muszę na dzień dobry wywołać okno wyszukiwania czyli ctrl+f, Nigdzie nie pisałem o tym okienku. Nie musisz go wywoływać. Wyszukujesz za pomocą funkcji wyszukaj.pionowo....
Witam! Od jakiegoś czasu poszukuję bezowocnie rozwiązania do następującego problemu: Buduję arkusz do rozliczeń i podliczeń różnych rzeczy dla pracowników mojego znajomego, ponieważ jednym z założeń jest prostota obsługi, próbowałem dokopać sie do funkcji lub makra automatycznie powiększającego tabelę o kolejny wiersz przy naciśnieciu klawisza enter....
Łączenie tekstów: =ZŁĄCZ.TEKSTY("Najtaniej: ";A1;B1) Szukanie spacji w tekście: =SZUKAJ.TEKST(" ";A1;1)
Witam, Wprawdzie "trochę się już bawię" w pisanie w VBA ale natrafiłem na sporą "ścianę". Problem do rozwiązania: Z poziomu makra w Excel'u potrzebuję: 1.Tworzyć/edytować oraz odczytywać pliki *.TXT ale nie na zwykłym dysku, tylko w sieci na dysku SharePoint, zasoby tego ShP są identyfikowane per użytkownik (aktualnie zalogowany na komputerze). 2. Dodawanie...
Poza tym arkusz (sheets) nie ma w visible "opcji" True. Oczywiście ma :) Właściwość Visible obiektu może przyjąć wartość True, False. Tu raczej podejrzewam błąd w nazwie (1004), lub włączoną ochronę skoroszytu (struktura). Spróbuj marcinj12 . Wstawianie nowego: Można wykorzystać zdarzenie 'Private Sub Workbook_NewSheet(ByVal Sh As Object)'. Wyłączyć...
czy jest jakieś narzędzie w Excelu które umożliwia zmianę kolumny D na podstawie C? Narzędziem do tego celu są formuły. czyli jeśli mamy kraj GB w kolumnie C to chciałbym dopisać w kolumnie D +44 i analogicznie dla całej reszty symbol + W kolumnie E (pole E2) wpisz sobie formułę [syntax=vb]=JEŻELI(C2="GB";"+44"&D2;"+"&... A następnie przeciągnij...
Na poprzednim forum miałeś kłopot z liczeniem formuł jeżeli nie ma daty. Jeżeli nie chcesz by ci wyliczało kiedy nie ma daty, formuły liczące z danej komórki zamknij w funkcji "jeżeli" np. (jeżeli w A1 jest data). =Jeżeli(A1="";""; i tu cała wcześniejsza formuła - bez równa się)
Jak masz nazwy ulicy - powiedzmy w kolumnie A, to w kolumnie B wstawiasz formułę np. ="ul."&A1 a potem przeciągasz formułę w dół i poźniej normalnie robisz łącza do komórek z poprawioną nazwą.
Słowo klucz na dziś: [url=http://office.microsoft.com/pl-pl/e... WARUNKOWE
Witam, nie znam się na excelu a muszę zrobić następującą rzecz : Mam 2 arkuszy. W pierwszym są nazwy plików (ok. 2000 tys) w jednej kolumnie, a w drugiej kolumnie status. W drugim są nazwy plików (ok 100) które powinny mieć status "block" w pierwszym arkuszu. Jak można "powiedzieć" drugiemu arkuszowi, żeby wyszukal to co ma w sobie w pierwszym arkuszu...
Te dwa przykłady nie składają się na żadną regułę :cry: Po pierwsze: w "starym" przykładzie - godzina zakończenia jednego zadania (przedziału czasu) była zarazem początkiem następnego, więc reguły mogły być symetryczne i formułę można było kopiować. W nowych przykładach: 1) Początek w piątek po 17-tej liczyć dopiero od poniedziałku, czyli ignorujemy...
Dziekuje za informacje. Niestey podana formula dziala tylko jezeli manualnie oddziele tekst uzywajac skrotu Alt+Enter. Zalezy miaby formula dzialala po uzyciu przycisku zamin tekst. Prosze zobaczyc zalaczony plik.
A więc chodzi o to: Prosty arkusz excela na potrzeby magazynu oraz rozliczeń finansowych pomiędzy 2 osobami. http://www.smsnet.pl/~viperpl/towar.xls Osoba Łukasz za każdy sprzedany przedmiot płaci Darkowi:) w Kolumnie Łukasz - sprzedał wpisywana będzie ilość sprzedanych sztuk przez Łukasza. Ilość sprzedanych sztuk musi zostać pomnożona przez cenę jednostkową...
A funkcja konwersji na tekst =TEKST(A1; "0") nie wystarczy?
Witam, Można użyć prostego makro - tylko nie wiem, czy o takie coś chodzi koledze: [syntax=vb]Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) Dim x As String If Target.Value = "" Then Exit Sub x = Replace(Target.Value, " ", "*") If Left(x, 1) <> "*" Then x = "*" + x If Right(x, 1) <> "*" Then x = x + "*" Target.Value...
Dlatego ze Frytek Grzegorz jeszcze nie pracowal Czekaj...
Zwykłe SUMA.JEŻELI+SUMA.JEŻELI powinno rozwiązać sprawę...
chcę to zmienić na przycisk To proponuję wykorzystanie kodu typu :spoko: : [syntax=vbscript]Public Sub Powiel() i = 2 Do Until IsEmpty(Cells(i, 7)) If Cells(i, 7).Value > 1 Then a = i + 1 b = a + Cells(i, 7).Value - 2 Range("A" & i & ":K" & i).Select Selection.Copy Range("A" & a & ":A" & b).Select Selection.Insert Shift:=xlDown Range("G" & i & ":G"...
Witam Tak na wstępie miło mi was poznać jest to mój pierwszy post, także mam nadzieje że dobrze przyswoiłem regulamin. Jestem dosyć zielony w Excelu, ale pracuje w firmie na magazynie i chciałbym sobie ułatwić trochę codzienne liczenie produktów na półkach( taki wymóg ). Stworzyłem swój własny arkusz magazynowy zawierający każdy Model telefonu i ilość...
Jeśli chodzi o święta ruchome, to trzeba sobie zrobić listę dla każdego roku i sprawdzać np. funkcją PODAJ.POZYCJĘ jak w załączonym przykładzie. Poza tym jeśli ma to być zrobione porządnie, sprawdzanie niedziel i świąt trzeba zrobić kilka razy na przemian, bo są takie sekwencje jak 1 i 3 maja, a 2 maja może być niedziela, podobnie 25 i 26 grudnia, a...
Nagrałem makro które kopiuje dana tak jak chce, lecz gdy zmienię datę (B2) to dalej wkleja do tych samych komórek a nie pod odpowiednią datę.
Usuń z kodu dodawanie przecinka.
Mam wątpliwości czy zrozumiałem to co chciałeś mi przekazać, ale mam wrażenie, że opisałeś to co było sednem mojego pierwotnego pytania. Czyli jeżeli na liście ComboBoxa są już wprowadzone dane (kolumn >10) to dodawanie kolejnych pozycji działa bez błędu. Pierwsze załadowanie listy też realizowałem przepisując tablicę, trochą co prawda inaczej niż...
excel dodawanie excel dodawanie znaków dodawanie wiersza excel
chińskie skutery schemat czujnik pralka bascom atmega8 ds18b20
depollution system faulty peugeot philips hr7958
Dell laptop - kod błędu 2000-0000, klawiatura nie działa Opel Vectra C benzyna - znaczenie napisu DG