Zmiana na format tekstowy nic nie da bo excel zadziałą z automatu i przestawi na datę. Proponuję wykorzystać formułę podstaw(). Czyli gdy np wyniki masz w kolumnie "B" od drugiej komórki czyli "B2" to w komórce obok czyli "C2" wpisz: =PODSTAW(B2;":";"-") i skopiuj w dół. Potem skopiuj kolumnę C z tymi danymi i wklej specjalnie z opcją "wklej tylko wartości".
Rozumiem, że chodzi o Excel. [syntax=text]Opcje programu Excel > Sprawdzanie > Opcje autokorekty > Zamień: kk Na: kosowski[/syntax]
1. Zaznaczasz obszar, który ma być zmieniony. 2. Edycja->Zamień 3. W polu "Znajdź" wpisujesz ciąg który ma być zamieniony. 4. W polu "Zamień na" ciąg na który ma być zmieniony. 5. Kliknij "Zamień wszystko".
Dalej jest źle bo nie to spakowałeś ale już stworzyłem sam. Na razie bez makro ale dodałem kolumnę pomocnicza D (Jak masz dane to prawy klawisz myszy na literę kolumny D i "Wstaw"
Propozycja makra, które działa wg poniższych zasad: 1) Reset danych za pomocą przycisku "Reset" wypełnia zakres liczbami od 1 do 14. 2) Jeśli chcemy zamienić liczbę na tekst typu #/#, gdzie # oznacza cyfrę, wystarczy zrobić dwuklik na komórce. Można też edytować ręcznie, pamiętając żeby na początku wstawić apostrof - inaczej Excel zamieni to na datę....
dla przycisku tak daj takie samo makro tylko zamień True na False
Zaznacz wszystko (Ctrl+A ) i zamień (Ctrl+H ) . Jeżeli ten tekst nie jest w komórkach to zaczyna być kłopot. Jeżeli te "okienka" to formant formularza to wyłącznie pisanie makra lub ręczna zmiana. Jeżeli to formant ActiveX to zaznacz wszystkie okienka z tym tekstem (pomocne jest włączenie okienka zaznaczania (na wstążce "znajdź i zaznacz a tam okno...
A to jakiś problem w tym przypadku? Bo z tego co widzę, to problem dotyczy jedynie komórek które mają wartość 0, niemniej Excel sobie z tym radzi np. przy sumowaniu. Najprostszy w tym wypadku jest CTRL+H i zamień 0 na 0 ;)
Do pierwszego możesz użyć funkcji RIGHT (zakładając że tydzień jest dwucyfrowy i zawsze na końcu) tydzien = Right(wartosc_komorki, 2) Do drugiego: albo użyć przycisku którego kliknięcie wywołuje makro dodające nową osobę do zakłądki "status" i "zasoby", albo spróbować obsłużyć zdarzenie Worksheet_Change zawężone do kolumny gdzie jest nazwisko....
No nie mów, że nie wiesz... [syntax=vbscript]Y.Sheets("Arkusz1").Ran... = X.Sheets("Arkusz1").Range("A1")[/syntax] Zamień A1 na właściwą komórkę.
ponieważ VLOOKUP wyszukuje wartości z kolumny na prawo i tyle... Ściślej: przeszukuje skrajną, lewą. Zamień kolumny miejscami i zadziała...
Jeżeli wszystkie arkusze, to: [syntax=vbscript]Sub Zaznacz() For x = 1 To Sheets.Count Sheets(x).Select False Next End Sub [/syntax] Jeżeli tylko do n-tego, to zamień Sheets.Count na 'a'.
Jest wiele metod, napiszę ci taką, która mnie odpowiada. Zaznaczasz wszystkie komórki, wybierasz opcję: szukaj i zamień. Wpisujesz to co ma być zamienione, na to co ci pasuje [kropka na przecinek, czy przecinek na kropkę], i klikasz zamień wszystko, i to tyle.
Ale wiesz, że tam (arkusz magazyn) są funkcje tablicowe i wychodząc z nich wciskasz Ctrl+Shift+Enter edit: W arkuszu magazyn masz więcej błędów. Daty odwołują się do 100 wiersza a ilości do 170. Zrób tak z arkuszem magazyn: Zaznacz cały arkusz i wciśnij CTRL+H Wpisz w wyszukaj $170 a w "zamień na" $2000. Wciśnij "zamień wszystko" Potem to samo z setką...
jedyne co przychodzi mi do głowy to znajdź i zamień
=JEŻELI(warunek;jeżeli tak to ; jeżeli nie to) Przykładowo: Komurka A1 i A2 to dowolne liczby =JEŻELI(A1-A2>0 ; A1-A2 ; 0) (niekoniecznie musi działać ze spacjami koło średników)
Małpa '(at)' Ale wszystkie liczbowe będziesz musiał "przeedytować" (F2>Enter), żeby Excel zamienił sobie na tekstowe. W przyszłości wpisuj poprzedzając apostrofem.
Jest błąd w linii określającej warunek: If Right (komorka, 3) = " a " Then Powinno być: If Right( Cells (komorka, 3), 1 ) = "A" Then A jeszcze lepiej zamienić na małe litery. Taki zapis jest odporny na ciągi z/bez użycia CapsLock'a. [syntax=vb]If Right(LCase(Cells(komorka, 3)), 1) = "a" Then[/syntax]
Tak, to mój cytat.
Tam jest napisane Część danych... ...jako tekst? Zapewne chodzi o komórki z datą. Zamień komórki z datą na tekstowe lub użyj skrypt: Application.DisplayAlerts = False
dziękuję, to wiele wyjaśnia :)
Przepraszam, jeśli napisałem to niejasno, ale to między innymi dlatego, że nie było przykładowego pliku, nie wiem czy dane są w wierszu, czy w kolumnie, czy w zakresie prostokątnym i czy mają być trwale zmodyfikowane (na wartości w tym samym miejscu) czy za pomocą formuł - to znaczy oryginalne dane pozostają na swoim miejscu, a dane przetworzone umieszczamy...
Nie mam pojęcia jak wyliczyłeś "swoje" minuty. Jaką godzinę przyjąłeś za pierwsza że ci wyszło to co wyszło. Obok załączyłem wyliczenia minut, przyjmując że badanie rozpoczęło sie 8 marca o godzinie 00:00 i każda data i godzina to kolejna wartość zwiększająca czas "eksperymentu" o daną ilośc minut
Zrob UDF funkcje [syntax=vb]Function zlacz(Tgt As Range) As String For Each c In Tgt s = s & c & ", " Next zlacz = Left(s, Len(s) - 2) End Function [/syntax]
Gdy tak zrobię wychodzi 11:12 Musisz sformatować komórki na odpowiedni typ danych. Po za tym w załączniku do poprzedniej wiadomości masz plik z przykładem.
Załączam plik który wykorzystuje kwerendę (połączenie z bazą poprzez import) z przyciskiem aktualizującym (makro aktualizujące kwerendę). Podobnie jak to zrobił kolegę adamas_nt z tym że w moim przypadku makro tylko wymusza odświeżenie kwerendy. Przy tym rozwiązaniu dane zawsze będą pobierane i aktualizowane na podstawie bazy więc jeżeli zmienią się...
#N/D! jest specjalną wartością komórki (błędem). Jeżeli chcesz ją sprawdzać przez Cell.Value i zawęzić tylko dla #N/D!, zrób tak: [syntax=vb]For i = 1 To Worksheets("Sheet1").Cells(Rows.Count, "C").End(xlUp).Row If IsError(Worksheets("Sheet1").Cells(i, 3).Value) Then If Worksheets("Sheet1").Cells(i, 3).Value = CVErr(xlErrNA) Then Worksheets("Sheet1").Cells(i,...
Private Sub Worksheet_Change(ByVal Target As Range) Dim e2 As Range, q2 As Range, f5 As Range, f6 As Range Dim f2 As Range, q5 As Range, q6 As Range Dim r5 As Range, r6 As Range, y5 As Range, y6 As Range, z5 As Range, z6 As Range Application.EnableEvents = False For i = 0 To 2 Set q2 = Sheets(1).Cells(i * 9 + 2, "Q")...
Zamień dzen = Format(Weekday(Date, 1), "dddd") na dzen=Range("AA13")
To Kolega ma to w Excelu czy w Accessie? Zwykłę Ctrl+H (aka: ZAMIEŃ) wyrazu ULGA na pusty ciąg nie wystarczy (jedynie w zaawansowanych opcjach zamiany trzba odznaczyć ptaszka przy "Dopasuj do całej zawartości komórki")??
Rzeczywiście przy odrobinie złej woli można to makro wprowadzić w błąd :cunning: Żeby ograniczyć tą możliwość - zamień jeszcze kod "With Selection.Cells" na "With Target.Cells" :ok:
Trzecią linię od końca czyli [syntax=vbscript]Name JPlik As Sciezka & NFolder & "\" & NPodFolder & "\" & NPlik[/syntax] zamień na [syntax=vbscript]FileCopy JPlik, Sciezka & NFolder & "\" & NPodFolder & "\" & NPlik[/syntax]
A żeby trochę sprawę zagmatwać (uprościć) sugeruję napisanie każdej funkcji w jednym wierszu. Mianowicie wyrzuć dodatkowe deklarowane zmienne. Moim skromnym zdaniem laika są one tam zbędne.
Najprościej jak się da: Plik -> zapisz jako -> tekst (rozdzielany znakami tabulacji) Otwórz tak spreparowany dokument w Wordzie edycja -> zamień w pole znajdź wpisz ^t w pole zamień na wpisz ^v w efekcie zamienisz wszystkie tabulatory na entery - i powstanie jedna kolumna później trzeba taki spreparowany dokument zaimportować do EXCEL-a
mam makro ktore dzieli komorke na 2 po ktoryms znaku Zanim zaczniesz dzielić, zamień na String. Zadbaj, aby wyniki po podziale również były typu String (deklaracje) i nie będzie kłopotu.
Bez problemu da się zaimportować. - Zmień rozszerzenie pliku na CSV. - Usuń nagłówek (albo popraw) - Zamień wszystkie kropki na przecinki. - Wybierasz rozdzielenie tabulacją. ....i voila :) P.S. Kluczowa jest pogrubiona operacja.
Mam mały problem, posiadam kilka kodów liczbowych w takiej formie 1661, 1662, 1663 ... itd. Chciałbym aby Excel zmienił mi liczbę 1661 na zdefiniowane słowo. Nie chcę tego robić za pomocą wyszukaj zmień, chciałbym aby sam program zmieniał mi to. Jak to zrobić, wykorzystać funkcje?
Dzięki! No właśnie Split - bo zapomniałem :) i już miałem stosować Replace do tych "twardych Enter"
Musi to być program, bo np. Excel ma taką funkcję.
[syntax=vb]Str = Trim(cell.Value) if Str <> "" Then cell.Value = Str Else If not cell.MergeCells Then cell.Clear[/syntax] Było NOTHING wpisujesz "", owszem teoretycznie Excel powinien zamienić "" na NOTHING zaś jest to tylko teoria.
1. W celu uzyskania daty, zamień "." na "-" w kolumnach D i K -zaznacz kolumnę -Ctrl+h Nie wykonuj, jeśli u Ciebie wyświetla prawidłową datę (Czesi mają kropkę, zdaje się). 2. Odejmowanie+format niestandardowy
Dobrze, że dałeś sobie radę. To się ceni ale to samo co na pięciu przyciskach możesz mieć na jednym po zastosowaniu mojego kodu. Nie chcę Ci udowadniać wyższości Świąt Bożego Narodzenia nad Wielkanocą. Mam jednak drobne podejrzenie, że mój kod przekleiłeś w całości bez sprawdzenia. A tam był drobny błąd na który nie zwróciłeś uwagi. A1 . Zmień sobie...
Witam! Zaznacz niechciany znak "wskakując" kursorem na pasek formuły i skopiuj do schowka. Następnie w wolnej komórce wpisz formułę: =KOD("V"), gdzie V - naciśnięcie kombinacji CTRL+V (wklejenie znaku). Excel zwróci kod ASCII znaku, w tym przypadku 160. Następnie w oknie znajdź trzymając wciśnięty ALT wystukaj z KLAWIATURY NUMERYCZNEJ a nie z linijki...
Chyba, że chcesz wpisać w kolumnę A "CC" lub "DD" a w kolumnie B pojawi się "jakiś" lub "coś". Tak się da :)
Jeśli chcesz zamienić cyfry na litery to poleceniem znajdź i zamień Ctr+F Generujesz tak jak poprzednio tablice z cyfr i zamieniasz jak chcesz na litery np. zamień 1 na A itp.
Zamień miejscami sprzedane i wyprodukowane ?
Zrób sobie kopię pliku, w makro linię ".PrintOut" zamień na ".Printpreview" i odpal makro...
Prościej: edycja -> zamień "mailto:" na nic. Tzn w polu szukaj wpisujesz mailto: a w polu zamień na, nic nie wpisujesz.
Czy jest jakaś reguła na te przejścia?
Dziękuję za pomoc - w tym przypadku najszybszym rozwiązaniem okazało się skorzystanie z funkcji znajdź/zamień. Makra użyję w grubszym przypadku.
Spróbowałem z minutami i... koloruje OK. Widocznie sekundy to za często (dla mojego sprzętu) W arkuszu są dwa formatowania warunkowe. Tworzysz je identycznie (instrukcja w arkuszu) Zamień MINUTA na GODZINA, ew: GODZINA($G$2)=LEFT($D4,2)=... Edit: 8:00 - podmieniłem załącznik (59+1=0) Na rysunku, widzę, masz co trzecią kolumnę. Można jak w załaczniku2
Ja też się zastanawiałem nad tą sumą. Czasem daje się to na zabezpieczenie przed tekstem lub pustym tekstem w komórce źródłowej, żeby zamienić to na zero. Podejrzewam, że przy tej liczbie plików raczej będą zamknięte, dlatego ja proponuję rozwiązanie nie tak proste, ale mam nadzieję skuteczne przy zamkniętych plikach. Najpierw trzeba utworzyć odpowiednie...
Proszę bardzo prosty kod w makro. Zmodyfikowałem troszkę nagrane makro - Zamień (Ctrl+H) z uwzględnieniem wielkości liter. Sub Makro1() For x = 1 To 18 Selection.Replace What:=Cells(x + 1, 1).Value, Replacement:=Cells(x + 1, 2).Value, LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=True, SearchFormat:=False,...
Możesz skorzystać z funkcji "lewy" i "prawy", później wszystko zamień na minuty(chociaż zliczając tylko godziny nie musisz)...dalej już chyba dasz sobie rade ;-) Ściślej w jednej komórce można taką funkcją: =JEŻELI(D5<>"";PRAWY(D5;2)-LEWY(D5... Oczywiście tyczy się komórki D5. Pozdro
A próbowałeś przy pomocy Ctrl+h ? Przecież to nie jest takie skomplikowane a robisz to raz dla całego arkusza klikając Zamień wszystko .
Zamień [syntax=vb]ActiveSheet.Paste [/syntax] na [syntax=vb]ActiveSheet.PasteSpecial Paste:=xlPasteValues[/syntax]
[/quote]W Wordzie i Excel-u jest tam też opcja "Zamień wszystkie" (znaczy się była, mój już "stary" bo Office 2007, może teraz w "nowych" nie ma). No jednak taką zamianę można stosować jednak do poszczególnych znaków, więc trzeba by było każdy znak wprowadzać osobno i wtedy "Zamień wszystkie" i tak po kolei dla wszystkich znaków... To też nie o to chodzi...
A jednak jest opcja bez ręcznego scalania, wystarczyło się wyspać. W skrócie- zamień znaki akapitu na jakiś ciąg znaków, zamień 2cyfrowe liczby na 1cyfrowe, zamień ciągi cyfra kropka spacja na znak akapitu. Wklej do Excel, posortuj (lub w Word jeśli się da), dodaj numerację. Zamień wcześniejszyc ciąg znaków na znak akapitu. Gotowe.
>Perelka: zamień JEŻELI.BŁĄD na JEŻELI(CZY.BŁĄD i przy zapisywaniu w trybie zgodności powinno być OK. >marcin_cesarz: W arkuszu kol. Perelka w F2 wklej i przeciągnij w dół: =JEŻELI(CZY.BŁĄD(SZUKAJ.TEKST("żółty";D2...
Zamień Sheets("Obliczenia").Select na Sheets("Obliczenia").Activate A najlepiej jeszcze uprość te makro [syntax=vb]Sub kopiuj() Sheets("Obliczenia").Range("A3:A506").Co... Sheets("Wynik").Activate End Sub [/syntax]
Zaznacz interesujące Cie komórki => PPM => Formatuj komórki => zakładka liczby, pole kategoria => zaznacz liczbowe Ewentualnie może być problem przecinka i propki. W zależności od ustawień Excel toleruje albo przecinek, albo kropkę jako separator dziesiętny. Zobacz jak masz w swoim cenniku i jaki format akceptuje excel (możliwe że masz ".", a excel...
No tak, zamień If .Cells(i, 1) > nrSpr Then na If .Cells(i, 1) > nrSpr Or .Cells(i, 1) = Empty Then
Jeżeli chodzi o arkusz to nie ma problemu. Zamień Sheets("Arkusz1") na ActiveSheet wtedy wypełnianie tabeli będzie dotyczyć aktywnego arkusza. W załączeniu sortowanie nie na "Tabeli" edit -------------------------- Jak już jest sortowanie trochę inaczej, to numerację (Lp) dodałem do pętli wpisujących dane tabeli C
W Excelu 2003: [syntax=vb]=JEŻELI(CZY.BŁĄD(A1);0;A1)[/s... w późniejszych: [syntax=vb]=JEŻELI.BŁĄD(A1;0)[/syntax]
To jak już w Excel-u masz w poziomie to znajdź Zapisz jako i znajdź plik typu *.csv, zapisz. Następnie plik.csv otwórz w notatniku (powinieneś mieć "imie1 nazwisko1";"imie2 nazwisko2";"imie3 nazwisko3"), zaznacz całość i skopiuj do Word-a. Użyj funkcji znajdź/zamień i w 1 polu wpisz ; a w polu poniżej ,[spacja] kliknij Zamień wszystko i powinno być...
Można też zamiast "Zamień na" kliknąć na przycisku " Zamień wszystko " jak na zrzucie kranu poniżej (MS Excel 2007). Za jednym razem zostaną zamienione wszystkie znaki jednego rodzaju. Ja tak właśnie robię. Jeżeli jednak codziennie muszę robić to w każdym otrzymanym pliku, to jest to i czasochłonne i wyjątkowo nużące. Dlatego też myślałem, że makro...
Ponieważ kolumna C to trzecia kolumna więc zamień we wszystkich Cells() jedynkę po przecinku na trójkę czyli ,1) na ,3) np.: Cells(1,1) na Cells(1,3) i dla pewności w lini kodu OstWrs = Cells(Rows.Count, 3 ).End(xlUp).Row
Jeżeli to są funkcje excela (nie makro) to: Skopiuj (nie przenoś) skoroszyt B do katalogu gdzie jest skoroszyt A. Otwórz tylko skoroszyt A "Wejdź" w formułę gdzie jest odwołanie do skoroszytu B (będzie się jeszcze odwoływać do starej lokalizacji skoroszytu B) Skopiuj ścieżkę (zaznacz w formule ścieżkę do pliku B i Ctrl+C ) "Wyjdź" z komórki i zaznacz...
To zamień =dziś na <=dziś
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...
Najszybciej zrobisz to bez excela ;) 1. Zainstaluj sobie Notepad++ (Freeware) 2. Skopiuj do niego zawartość arkusza. Lub zapisz arkusz jako csv i otwórz w Notepad++ 3. W Notepad++ zamień znak tabulatora "\t" (jesli kopiowałeś) lub średnik ze spacją "; " (jeśli zapisywałeś csv) na znak nowej linii ("\n"). Musisz użyć wyszukiwania rozszerzonego 4. Wynik...
Ech, pomyliły mi się te plusy z minusami :) Trzeba zamienić warunki pętli.
Mam pewien dokument do zrobienia o który poprosił mnie kolega który za bardzo się nie zna, ja w sumie też. Więc dlaczego się podjąłeś? ;-) Czy ktoś pomoże bo ja noga lewa jestem ...ponawiam pytanie ;-) Skorzystaj z funkcji "Znajdź i zamień", oraz odpowiednio wykorzystaj dostępne tam opcje.
A co z różnicą? Jadwiga wypożyczy 2szt wiertarki, a odda jedną (drugą zamieni na topowy lakier do paznokci). Co wtedy?
Zamień linię: ActiveWorkbook.SaveAs "C:\MONTH CLOSING\FY2013\MAKRO&FILES\FY2013\P&L BY MONTH_values\FY2013\October YTD\CUSTOMERS FILES\" & Arkusz.Name na: ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\MONTH CLOSING\FY2013\MAKRO&FILES\FY2013\P&L BY MONTH_values\FY2013\October YTD\CUSTOMERS FILES\" & Arkusz.Name & ".pdf", Quality:=...
Czy istnieje w Excelu w funkcji "Znajdowanie i zamienianie" możliwość wstawienia symbolu, który by zastępował dowolny znak w komórce? Przykładowo chciałbym, żeby we wskazanych niżej ciągach znaków 4 pierwsze znaki zostały zamienione na ABCD. Do zamiany jest ok. 1000 komórek. 123A123-> ABCD123 123B124-> ABCD124 123C125-> ABCD125 123D126-> ABCD126 123E127->...
Nie do końca wiem o co ci chodzi. Jeżeli chcesz aby po skopiowaniu komórek funkcje/wzory odnosiły się do nowych komórek ale w tym samym "ułożeniu" jak do komórki kopiowanej trzeba pozbyć się znaków $ (dolara) w funkcjach/wzorach (np: A10 + B10) [Znak $ wstrzymuje zmianę kolumny lub wiersza lub kolumny i wiersza przy kopiowaniu] Jeżeli chcesz zrobić...
Ok poradziłem sobie. I tak dla potomnych. W Excelu 365 importuje cvs-a i przed załadowaniem klikam edycja, separator przecinek, wszystko ładnie się układa w kolumny. Ustawiam pierwszy wiersz jako nazwy kolumn (dane się trochę ujednolicają) zaznaczam pierwszą kolumnę z danymi w postaci naukowej, zamieniam kropkę na przecinek i potem klikam wykryj typ...
Kolego możesz to zrobić nawet w notatniku. Zastosuj ZAMIEŃ (CTRL + H). Tych poprawnych trochę jest jednak, jaki masz Excel? Konwersja z automatu może nie wyjść za bardzo.
Albo "na pałę" - jeśli używasz jakiegoś bardziej zaawansowanego notatnika, np. Notepad++ kopiujesz i wklejasz do niego całą kolumnę, a potem wybierasz Zamień (w trybie rozszerzonym) znak \r\n znakiem ;
Też nie działą Ale ty jesteś małej wiary :) Działa, działa, tylko trochę wiedzy jak wpisywać. Zaznaczasz obszar Wciskasz Ctrl+H (bo to jest skrót "zamień" bo CTRL+F to na na znajdź - to tak dla zasady) Wpisujesz spacje w "znajdź" a zamiast "twojego \n stajesz w okienku "zamień na" wciskasz i trzymasz lewy alt a z klawiatury numerycznej (ma być włączona)...
Użyj przycisku "szukaj" Tyle było ostatnio wątków o rozliczaniu czasu pracy że ciężko nie znaleźć. Wejdź w jakikolwiek i zobacz jak tam się zmienia kody literowe w cyfry. Do zwykłych dwóch liter wystarczy Jeżeli() ale znając życie zapewne rozbudujesz to potem do parunastu liter więc może od razu wyszukaj.pionowo()
Witam, Mam pytanie VBA Excel. W pliku może być różna ilość zakładek. W każdej zakładce w kolumnie A mam wartość "1" chciałbym żeby makro zamieniało ją na wartość "2" czyli takie klasyczne zaznacz A:A i CTRL+H zamień "1" na "2" Pewnie da się napisać taką prostą pętle, która przejdzie przez wszystkie zakładki nie ważne ile ich jest i w każdej zrobi: zaznacz...
Witam, Mam problem z zamianą kolumn na wiersze w excelu. Moje dane źródłowe zawierają 171 wierszy i 166 kolumn. Szczegóły na poniższych zdjęciach wedle zasady jeden obraz tysiąc słów. Nie wiem czy są jakieś formuły czy trzeba już skorzystać z VBA. Z góry dziękuję za pomoc. Dane wyjściowe: http://obrazki.elektroda.pl/6491825200_1... Efekt jaki...
Kliknij prawym na tym pliku tekstowym i wybierz otwórz za pomocą i wybierz Exela Zaproponuje ci tam sam już opcje. Jako separator wybierz przecinek i już. Będą 2 kolumny. Następnie jeszcze w exelu - edycja znajdź zmień zamień - i zamieniasz wszystkie kropki na przecinki bo inaczej nie rozpozna w tym liczb (domyślnie przecinek jest tym co dzieli wartości...
Tak próbuje samemu i udało mi sie za pomocą funkcji PODAJ.POZYCJĘ okreslic numer wiesza w którym wystpuje piersze wystepienie wartości pozycji która jest potem powtarzana w tej samej kolumnie. Moje pytanie teraz jest nastepujące: Jaką funkcją moge zwrócic wartosc komórki z kolumny A mając numer wiersza? W zakładce Wyszukiwanie i odwołanie nie widze...
1. notatnik > znajdź i zamień wpisując poszczególne zależności 2. excel > do każdej komórki dodać wartość 17 3...x. proste programy czy to c/cpp/java/.net/python etc pobierające dane i dodający do nich 17 :)
Moja propozycja jest w pliku. Żeby nie było, że nic od siebie nie dałeś, uzupełnij zielone pola formułami na podstawie wpisanych równań. Jakbyś sobie nie radził, skorzystaj z naprawdę rozbudowanej pomocy Excela, przeróżnych forum (jest tego mnóstwo) - ja tak się nauczyłem Excela. Jestem tylko amatorem, mogłem nie ustrzec się błędów - jak by coś się...
=PRAWY(A2;4) zadziała tylko trzeba zweryfikować czy jest 4 znakowe oznaczenia użytkownika w całym arkuszu. I np pozycje 375 zamienić na 0375.
Chcę zrobić makro które wyszuka dany fragment tekstu i zamieni go na podany w danej komórce. Nagraj sobie makro z przeprowadzania procedury systemowej "zamień (ctrl+H)" i w odpowiednie miejsca wprowadź swoje comboboxy :idea:
Dokładnie o to mi chodzi, tylko żeby zrobić to nie w pętli, tylko dla całego zakresu od razu. Przy 100k+ wierszy powiesił mi się excel niestety. Jeśli robię to poprzez Text to column albo Zamień "=" na "=" takiego problemu nie ma. Taka pętla niestety jest zbyt wolna. EDIT: Ok, zadziałało w połączeniu z Selection , ale dla formuł które mają więcej niż...
skopiuj całą kolumnę do txt zrobi ci się jedno pod drugim zamień kropki na przecinki zaznacz wszystko skopiuj i wklej do excella excel zapyta jaka separacja wybierz rozdzielenie do kolumn po przecinku rozrzuci ci w cztery kolumny posortuj wstaw pomiędzy te kolumny kolumny z kropkami zsumuj tekstowo te kolumny
Zamień miejscami: Calculate Application.ScreenUpdating = True A jeśli to nie pomoże, na końcu funkcji wpisz cost=cost
Dziekuje za wszelka pomoc. Wiem ze to forum jest dla poczatkujacych programistow, a nie do spelniania zachcianek uzytkownikow, ale mam kolejna prosbe:) Cala konwencja sie zupelnie zmienila. Aktualnie potrzebuje tylko skrypt ktory zamieni nazwe plikow na te z pliku excel. Plik dolaczam ponizej. Mam pliki w 3 podobnie zbudowanych drzewach katalogow ktore...
Jestem początkująca w programowaniu vba... ...Potrzebuję wsparcia! Może ze względu na okres Świąteczno - Noworoczny mam ciężką zatrybkę. To co w cytacie zrozumiałem. Z resztą mam problem. Nie wiem czy dobrze zrozumiałem, ale na próbę zamień wiersz: ActiveCell.Copy Destination:=Cells(ostatniekryte... kolumna) na: Cells(ostatniekryteria,...
Witam. Funkcja ta niestety MUSI mieć poszukiwaną daną w lewej ( tzn. w 1-szej) skrajnej kolumnie tablicy. Natomiast nie musi podawać danej z 2 kol. ale z dowolnej. Moja rada: zamień poprzez kopiowanie lub wycinanie potrzebne kolumny ( 2 z 1) , jezeli nie możesz , to w oddzielnej części arkusz skopiuj całą tablicę (możesz ukryć kolumny skopiowane tak...
Zamień w odpowiednim miejscu kod na poniższy: [syntax=vb] If b Like "[ ][ ]333" Then p4 = InStr(a, " 4") p7 = InStr(a, " 7") If p4 > 0 Then x4 = Mid(a, p4 + 1, 5) Else x4 = "" If p7 > 0 Then x7 = Mid(a, p7 + 1, 5) Else x7 = "" t = t & x4 & ";" & x7 & vbNewLine End If [/syntax] Wynikiem jest: 11406;42005;70005 11414;42005;79999 11423;44013;70001 11433;;70000...
Wszystko działa dopóki liczby w combobox'ach mają tyle samo cyfr. To powinno Ci dać do myślenia. ComboBox-y przechowują poszczególne pozycje jako ... ciąg znaków, a nie wartości liczbowe. W swoim kodzie, zamień wartość Value , z wszystkich trzech Combo na liczbę i porównaj wtedy. Np. tak : If Val(ComboBox1.Value) < Val(ComboBox2.Value)...
Cześć Nie wiem jak to się fachowo nazywa stąd pewnie dlatego nie udało mi się wyszukać Wydaje mi się że szybciej tu znajdę podpowiedź Mam kilka różnych formuł które korzystają z tego samego zakresu np suma(a1:a10) licz.puste(a1:a10) licz.jeżeli(a1:a10) Zakres ten czasem będzie się zmieniać Chcę w osobnej komórce podawać początek zakresu na zasadzie...
Jeśli masz te wartości zapisane z przecinkiem ale w formacie godzina,minuty, to się nie uda, bo excel dodaje minuty jak normalne liczby, nie przesuwając po 60. Jest na to rada. Zrób kopie pliku dla bezpieczeństwa. Wejdź w Edycja>>zamień>> w pola wpisz odpowiednio żeby zamienił przecinek na dwukropek i naciśnij Zamień wszystko. Następnie zaznacz kolumnę...
znajdź zamień zamień bajty ne555 zamień
schemat nissan primera laguna klapa bagażnika różnicowy regulator temperatury
siemens eq500 elektryka renault
Zniekształcony i dublowany obraz w Panasonic LED 4K 55 Wymiana absorbera tuszu w Epson Stylus Photo RX520