Może więc takie rozwiązanie jak w załączniku? Menu kontekstowe PPM jest zablokowane, ale jeśli nawet ktoś je wywoła, to nie może wykorzystać wklejania: http://obrazki.elektroda.pl/7679986700_1... Na wstążce zablokowane są funkcje przycisków: http://obrazki.elektroda.pl/8622171000_1... Cały czas jednak mam wrażenie, że takie całkowite...
Istnieje na to jakaś funkcja, Mozna funkcja przy zalozeniu ze numery pozycji z CP-P, CP, TPP itd. i rok nie powtaraja sie tzn. ze np. 201207527 w kosztach jest tylko dla 2012 TWP w 'arkusz...2012 w B7 =INDEKS('[koszty pozyskania.xlsx]WYKONANIE 2011 2015'!B:B;PODAJ.POZYCJĘ($A7;'[koszty pozyskania.xlsx]WYKONANIE 2011 2015'!$A:$A;0)) przeciagnij wprawo...
Przyznam że też myślałem żeby np przy przeliczaniu arkusza Private Sub Worksheet_Calculate() 'odpowiedni format komórek End Sub albo zmianie w arkuszu Private Sub Worksheet_Change(ByVal Target As Range) 'odpowiedni format komórek End Sub wstawiać dany format poszczególnym komórkom. Innej możliwości nie widzę ("protect" nie ma takiej...
Witam, Posiadam w pracy pewien program zakładowy do którego muszę wklepywać numery zamówień. Jest to trochę męczące zajęcie, ponieważ na dzień mam 150 pozycji do wpisania a właściwie przepisania z arkusza w excelu. Każdy numer muszę przepisac lub wkleić osobno. Każdy numer zamówienia mam w osobnym wierszu, dlatego po kolei kopiuje sobie komórkę i wklejam...
Witam serdecznie, mam problem dotyczący wklejania danych w postaci tekstu do Excela. Konkretnie, kiedy wklejam do Excela tekst skopiowany ze strony internetowej (kopiowane dane to opisy produktów) do konkretnej komórki odpowiadającej danemu produktowi, a w tekście są "twarde entery", każdy kolejny wiersz tekstu po takim enterze ląduje w następnej komórce...
Mnie te makra nie zawiesiły Excela ani razu, ale testowałem je na wersji 2007 i 2010. Być może problem jest spowodowany przez połączenie wklejania danych ze schowka z wstawianiem komórek. Jeśli formatowanie komórek nie ma znaczenia i kopiowane są stałe (tak to przynajmniej wygląda w przykładowym pliku), to może zrezygnować z kopiowania na rzecz przypisywania...
Ciężko się trochę połapać w tych twoich powiązaniach między arkuszami. Nie bardzo rozumiem ten opis odnośnie wklejania itd. Przydałby się twój arkusz do analizy. Jeżeli jednak z jakiegoś powodu nie możesz zastosować funkcji JEŻELI.BŁĄD w kolumnach B, C i D, to przed sumowaniem skopiuj ich zawartość wpierw do kolumn E, F i G przy pomocy tej funkcji takich...
Opcje formatowania są wygaszone, a we wklej specjalnie mam do wyboru jedynie mapę bitową. Problem występuje jedynie pomiędzy arkuszami, bo w obrębie jednego arkusza nie ma kłopotów wszystko chodzi.
Prostsza metoda przez 'sendkeys' (jak co to zostaje rangetohtml) ........................... Podmieniłem załącznik
Mam plik csv do importu do sklepu no i powinien on posiadać ID numer, ale trzeba go dopisać. Otwieram plik w excelu i mogę tam dopisać na początku każdego wiersza te numery jednak to nie o to chodzi żeby robić to ręcznie prawda? jakiej komendy itd użyć żeby excel dopisał do początku każdego wiersza "1|" ? Dla wyjadaczy to prościzna, ja sie na tym nie...
Czy mógł by mi ktoś pomóc? Jestem zielony i nie znam sie na programowaniu w VBA. Wykonałem formularz z wykorzystaniem UserForm i chce dodać każdą daną z Textbox do arkusza i to mi się udaje, ale chce aby kolejne wpisanie wartości do TextBox było wpisywanie do wiersz a poniżej, a nie zastępowało te poprzednie. http://obrazki.elektroda.pl/1247350200_1...
Witam, mam następujący problem. Nie jestem programistą i generalnie gubię się przy wprowadzaniu jakiś kodów, a muszę co jakiś czas modyfikować taki kod: name="TUTAJ WSTAWIAM DANE" x="TUTAJ WSTAWIAM DANE" y="TUTAJ WSTAWIAM DANE" address="TUTAJ WSTAWIAM DANE" <desc><![CDATA[<a href="TUTAJ WSTAWIAM DANE" target="_blank"><img src="TUTAJ...
Dzień dobry, proszę o pomoc w wykonaniu makra w Excelu. Zewnętrzny program eksportuje dane do Excela w postaci tabelki o kilku kolumnach. Ręcznie usuwam niepotrzebne mi kolumny zostawiając tylko jedną z potrzebnymi danymi w Kolumnie A. Teraz w kolumnie B1 wstawiam formułę =("słowo1" &$A1&" słowo2"). Teraz muszę ręcznie przekopiować zakres w kolumnie...
Ogarnia ktos jak dodac wlasny skrot lub autouzupelnianie komorki po wpisaniu 2 lub 3 liter typu skrót nazwiska np kk i uzupelni samo kosowski.
Witam, mam następujący problem znalazłem takie oto makro które świetnie działa, ale oczywiście nie u mnie (ja go nie napisałem, jeśli chodzi o makra to jestem zielony) [syntax=vbscript] Sub Dodaj_Wiersz() Dim lOstRw& Dim sForm$ lOstRw = Cells(Rows.Count, 1).End(xlUp).Row Rows(lOstRw).Offset(1, 0).Insert (xlShiftDown) Rows(lOstRw).Copy Rows(lOstRw).Offset(1,...
Witam wszystkich Potrzebuję pomocy w stworzeniu makra działającego wg poniższego 1. w arkuszu "dane2" mamy cennik produktów 2. w kolumnie E są przyciski pod które muszę podpiąć makro; przycisk z E2 kopiuje wartość komórki C2 do arkusza "dane1"w pierwszą wolną komórkę z zakresu A3:A20; przycisk z E3 kopiuje wartość komórki C3 do arkusza "dane1"w pierwszą...
Witam, otóż mam plik *.xlsm zawierający około 10 arkuszy w których są formuły i makra. Po zakończeniu edycji tego pliku chcę go przekazać dalej, ale taki plik otwiera się bardzo długo i zajmuje dużo miejsca, a dodatkowo każde przeliczenie zajmuje kilka minut... Czy jest jakiś sposób aby zapisać same wartości bez formuł i makr? Pozdrawiam i z góry dzięki...
Witam Mam do uzupełnienia dość spory arkusz. Zazwyczaj chodzi o wpisanie wartości w dwóch komórkach, ale często sprawy się komplikują i muszę wstawić nowy wiersz, skopiować kilka potrzebnych komórek z wiersza powyżej (nie wszystkie), wprowadzić zmianę w jednej komórce i sformatować wiersz. Jako, że jest tego dość dużo, a czasu mam mało, chciałem użyć...
Witam, Jestem nowy na forum i zwracam się z prośbą o pomoc. Mam skoroszyt, gdzie w pierwszym arkuszu jest tabela oferty dla klienta, którą mogę zapisać sobie w pdfie. W drugim arkuszu jest moje własne zestawienie ofert jakie szykuję dla klientów. Potrzebuję, aby dane z pierwszego arkusza znalazły się w drugim, wpisane w taki sposób jak to jest pokazane...
Witam, nazywam się Asia i muszę przeprowadzić analizę do pracy magisterskiej. Potrzebuję znaleźć wszystkie dotacje unijne, które skierowane są do kobiet. Robię to w taki sposób, że znajduję wiersz w którym znajduje się interesujące mnie słowo ( kobiet, kobiecy, matka itp.) a następnie kopiuję wiersz do innego pliku. Zajmuje to jednak ogromnie dużo czasu...
Witam poszukuję takiego sposobu aby cały czas w jednym miejscu wpisywać dane ( Arkusz do wpisania) a żeby w spisie pojawiało się po kolei tzn jeden pod drugim.
Witam! Chcialbym prosic o pomoc w napisaniu makra do przykladu z załącznika. Chodzi o to aby stworzyc przycisk w zakładce "dane" ktory bedzie zapisywal plik na pulpicie w formacie xls o nazwie z komórki "nazwisko" Chcialbym aby po zapisaniu pliku informacje wpisane do arkusza "dane" zostaly wyczyszczone i przeniesione do akrusza "dane2" ulozone w kolejnosci...
Hej Mam pewien problem, sam szukam i myślę, ale bez skutku, a znając życie rozwiązanie jest proste. Przygotowuję narzędzie do arkusz danych z kwestionariuszy ankiet. Dla ułatwienia chciałbym aby, tak jak w kwestionariuszu ("jeśli odpowiedziałeś 'nie' przejdź do pytania nr 9") tak i w arkuszu mi się skracało i automatycznie wypełniało zerami. W praktyce...
Witam, czy jest możliwość napisania formuły, dzięki której po dodaniu nowego wiersza automatycznie Excel powieli wartości kolumn z poprzedniego?
Proszę o pomoc, jestem początkujący (bardzo) i mam następujący problem Mam dane w akruszu1 kolejno w kolumnach od A do D 31.05.202113:581020 31.05.202113:587564 ... Potrzebuję skopiować wszystkie wiersze z arkusza1 dla liczby >=31 z kolumny 3 (C) do drugiego arkusza2. Najlepiej jakby skopiowane...
Twoja formuła robi tak jak chcesz czyli ma zmienić tylko aktywna komórkę czyli ActiveCell Aby to poprawić: zmień ActiveCell.FormulaR1C1 = ....(itd) na: rng.FormulaR1C1 = ....(itd) Czyli cała procedura: [syntax=vb] Sub kopiujtlumacz() Dim rng As Range For Each rng In Range("b2:b16") If rng.Value = "" Then rng.FormulaR1C1 = _ "=IF((ISNUMBER(SEARCH(R3C3,RC[-1]))),(R6...
Spróbuj [syntax=vb]Sub Makro() wrs = 2 'pierwszy wiersz zakresu ile = 36 razy = 30 Do While Cells(wrs, 1) <> "" wrs = wrs + ile For i = 1 To razy Rows(wrs & ":" & wrs + ile - 1).Insert shift:=xlDown Rows(wrs - ile & ":" & wrs - 1).Copy Rows(wrs & ":" & wrs + ile - 1) Next wrs = wrs + ile * razy Loop End Sub[/syntax]
w jaki sposób makro będzie wiedziało z którego fragmentu kodu html pobrać dane? Takie rzeczy zrobisz za pomocą kwerendy. (excel>narzędzia >pobierz dane zewnętrzne) do jakiejś bazy z kursami
Trzy przykłady w załączniku, ale zawsze trzeba sobie wyliczyć to przesunięcie, automatycznie się nie da.
Najpierw wyznacz pierwszą wolną komórkę [syntax=vbscript] lastRow = Range("BZ" & Rows.Count).End(xlUp).Row + 1 If lastRow < 3 Then lastRow = 3 End If [/syntax] nastęnie wkopiuj: [syntax=vbscript] Sheets("Dane").Range("BZ" & lastRow) [/syntax]
troszkę zmieniłem tabele źródłową - baza aby było bardziej przejrzyste. Widać kolego że zupełnie brak Ci wyczucia w tworzeniu kodu VBA, oraz stosowanej procedury mieszania - w jaki to sposób wydłużenie bazy danych może wpływać na przejrzystość - przez wykasowanie danych ilościowych i jednostek miar ;-) To skąd będziesz miał teraz dane ilościowe do...
Mówią, że deklarowanie zmiennych, to dobra cecha programisty. Są języki, gdzie bez deklaracji się nie da. W VBA nie jest _wymagane_ deklarowanie, ale jak chcesz, to używaj 'Dim'.;) P.S. Wykorzystałeś makro 'Kopiuj2'?
Range("L" & Rows.Count).End(xlUp).Offset(1).PasteSpe... myślałem, że chcesz od 101:) teraz powinno wklejać w kolejną wolną.
Cóż, taka już natura Excela... Pewnie wklejają się wszystkie odfiltrowywane wiersze, tylko jeden pod drugim, począwszy od pierwszego widocznego. Jak po tej operacji zdejmiesz filtr, to wszystkie odfiltrowywane wartości z kolumny A powinny być w kolumnie C, tylko jedna pod drugą. Nic na to nie poradzisz, trzeba po prostu być ostrożnym przy używaniu filtra...
Range("A5").Copy Sheets("arkusz2").Range("c" & Rows.Count).End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlValues
Witam, chciałbym stworzyć makro, które pozwoli mi na blokowanie możliwości wklejania i kopiowania danych z komórek przez użytkownika - z zastrzeżeniem, że blokada ma mieć miejsce tylko w jednym arkuszu w danym pliku, a nie w obrębie całego pliku; mam tu na myśli taką 'fizyczną' blokadę jak w niniejszym temacie na forum elektroda. http://www.elektroda.pl/rtvforum/topic22...
Podczas wklejania Excel traktuje tą komórkę z datą jako tekst, mimo, że oznaczysz ją jako data. Można to łatwo obejść stosując taką formułkę =DATA(FRAGMENT.TEKSTU(A1;1;4);FRAGMENT.T... Oczywiście w A1 mamy datę w postaci "2019-06-20" a komórka wynikowa ma format daty.
Najprawdopodobniej wchodzą dwa slash'e. Najlepiej dopisywać warunkowo. Przy okazji: przypisujesz tę samą wartość do dwóch zmiennych (nieszkodliwa nadmiarowość)[syntax=vb] ImgFldr = InputBox(AnsDirPrompt, "Powitanie", "C:\") 'ImgFldr = AnsDir CurrentFile = Dir(ImgFldr & IIf(Right(ImgFldr, 1) = "\", "", "\"))[/syntax]
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...
Mistrz ! dzięki bardzo ! :) Zrobiłem to na zasadzie kopiowania rubryk i wklejania w odpowiednie miejsce :)
Tak jak napisałam, chodzi mi o przyspieszenie kopiowania arkuszy i wklejania do innego skoroszytu. Chcę całkowicie z klawiatury wywołać polecenie "Przenieś lub kopiuj" arkusz. Przechodzenie pomiędzy arkuszami to elementarz ;-)
Excel 2007 - działa i kopiuje wartości bezproblemowo - formuła =JEŻELI(A1;A1;B1) Czyżby błąd w MsOffice 2010? A może jakaś ukryta opcja?
Powyższe problemy naprawione, teraz tylko ostatnia rysa do poprawy. Mianowicie, przy otwieraniu pliku wyskakuje mi komunikat (w załączniku), nie zawsze wyskakuje na wierzchu, czasem w tle i blokuje działanie programu, a nieuważny człek może go nie wykryć. Kod wygląda mniej więcej tak: [syntax=vb]Private Sub CommandButton1_Click() Dim nazwa As String...
Witam wszystkich potrzebuje pomocy w napisaniu dość złożonej (moim zdaniem) funkcji. https://obrazki.elektroda.pl/1147281200_... Otwórz potrzebuje stworzyć arkusz automatycznie liczący ilość zanotowanych błędów pod względem daty ich rejestracji. W pierwszej kolumnie mam listę błędów (każdy numer oznacza coś innego), w kolumnie f pojawiają...
Dzięki. Widzę że coś z tego wyciągnę. Jak zrobię to dam znać :) EDIT No niestety z tego linku nic nie wyciągnąłem. Próba utworzenia wizytówki niby wychodzi pomyślnie ale niestety fotka w żaden sposób nie wkleja się do wizytówki i jeszcze gorzej, po utworzeniu wizytówki nie da rady jej otworzyć na Smartfonie ale na Outlook otwiera się. Jak wyłączę opcję...
Masz racje może faktycznie ciężko i spaprałem opis, postaram się to sprawdzić po weekendzie. Jeszcze raz opisuje o co mi chodzi , mam 200 plikow w folderze "dane", w folderze "WZOR" jest plik wzorcowy wzor.xls oraz folder "CEL" czyli jest tak skrypt z folderu "dane" pobiera pierwszy plik to jest otwiera plik np g35.xls kopiuje odpowiednie zakresy komorek...
Witam. Mimo iż po zaznaczeniu całego arkusza i sformatowaniu komórek tak aby tekst był zawijany tak się nie dzieje po skopiowaniu tekstu zawierającego hyper link. Podczas edycji tylko tej jednej komórki zamiast √ jest kwadrat. Można skorzystać z opcji wklejania specjalnego, jednak to też nie pomaga. Proszę o pomoc.
Co do ustawień wklejania do jednej komórki to nie wiem - może gdzieś jest coś takiego. Jeśli chodzi o szukanie adresu to moim zdaniem pozostaje tylko formuła.
wyszukiwanie pionowe po dacie i kopiowanie danych na raport Witam! Zakładając, że obie tabele są na jednym arkuszu (jak w screenie :D ) proponował bym w obszarze wklejania wprowadzić jedną formułę tablicową: {=JEŻELI(A3=P1;B3:F5;"")} :idea: W zależności od faktycznych warunków można ją ewentualnie skojarzyć z wyszukiwaniem pionowym dat.
Próbowałem to wszystko i bez pozytywnego rezultatu. Jest tam opcja wklejania "zachowaj szerokości kolumn żródłowych". Brakuje tam aby opcji - zachowaj wysokość wierszy źródłowych. Ale najlepiej jakby się dało nic nie robic przy formatowaniu tabeli wklejanej np. do nowego arkusza. Aby ona miała wymiary kolumn i wierszy takie jak w "oryginale". Może da...
Chcę aby w arkuszu produkcja kolumna N , wpisując słowo 'got.' formuła przekopiowała mi cały wiersz do arkusza zrobione. No a jak "kolumna N" nie zna dobrze VBA :?: :D To jeśli W Excelu porusza(m) się biegle szuka(m) innych możliwych rozwiązań dla uzyskania pożądanego rezultatu. Przykładowo w Excelu 2007: 1. Porządkuje skoroszyt Produkcja.xls :sprawdzam...
A próbowałeś kopiowania i wklejania w taki sposób? :cry: Twoja funkcja oczywiście działa, ale... Moim skromnym zdaniem funkcja powinna zwrócić wynik jakiegoś mniej lub bardziej skomplikowanego obliczenia np. nie chwaląc się :D Pytanie po co robić coś takiego jako funkcję, nie makro uruchamiane np. przyciskiem??
Chyba powoli zaczynam łapać o co ci chodzi. Chcesz zbudować bazę pomiarów (bazę danych), a ten przykład co przedstawiasz jest tylko formatką do wprowadzania nowych pomiarów (danych do bazy) i ewentualnie odczytywania wcześniejszych danych. Tak? Jeżeli tak to może być kłopot właśnie ze zdjęciami bo przechowywanie zdjęć w arkuszu excelowskim jest trochę...
Cześć. Jako typowy human mam niestety problem z elementarnymi rzeczami informatycznymi. Ostatnio sen z powiek spędza mi import danych z wybranych kolumn. Wstyd przyznać, ale na razie robię to na zasadzie kopiowania pojedynczych kolumn i wklejania do nowego arkusza. I tak dwa razy w tygodniu. Sposób jest bardzo skuteczny ;-) ale zapewne można go znacząco...
Witam, Stworzyłem przycisk w Excelu w celu wklejania danych z użyciem transpozycji, w VBA wpisałem odpowiedni kod, który działa. Problem jest z utrzymaniem pozycji i rozmiaru przycisku. W miarę korzystania z niego zmniejsza się aż do małej kropeczki i zmierza w kierunku lewego górnego narożnika arkusza. Plik jest chroniony i udostępniony ze śledzeniem...
Witam. Problem z natury wydaje mi się prostych aczkolwiek nie potrafie go rozwiązać. Wykonuje w robocie tabelki, które nastepnie trzeba powielic wklejajac do innych arkuszy i zamieniajac wartosci w komorkach. Podczas wklejania Tabeli w nowy arkusz nie formatuja mi sie szerokosci kolumn wierszy na takie jakie były w poprzednim arkuszu. Jak to zrobic...
Co masz na myśli pisząc "karta"? Dla arkuszy skoroszytu można zagnieździć kod w kolejnej pętli For ark = 1 to thisworkbook.sheets.count ' lub liczbowo indeksy Np 2 To 4 sheets(ark).select 'kod Next
Witam, potrzebuję stworzyć formułę na podstawie tekstu. W jednej kolumnie mam tekst (3+6)*4 chciałbym aby w drugiej kolumnie była wyliczana wartość takiego tekstu - automatycznie wyliczana. Czyli znak = i wartość (3+6)*4 Czy jest jakaś formułą która by to wyliczyła ? Jedną kolumnę potrzebuję do wklejania do programu a z drugiej (wynikowej) korzystam...
Witam, Już kilka razy uzyskałem tu cenne porady w przypadku różnych funkcji Excela. Tym razem chciałbym sobie ułatwić pewne zadanie związane z uzupełnieniem odnośników do innego pliku w prawie 1000 komórkach bez potrzeby każdorazowego wpisywania znaku "=", wchodzenia w inny plik, kopiowania jego wartości i wklejania do pliku docelowego. Załączony plik...
Zgodnie z obietnicą. Jest już wygodny przycisk do wklejania tabelki wg. sugestii kol marek003 . p.s. Jeszcze mogą być błędy, jakby co to pisz... Edit 23:39 No i wykrakałem :) Pierwsza poprawka w makro dodaj_prac: p.s. Możesz tylko podmieniać makra w edytorze Edit 2: dopisz Call odkryj w makro: "zrob_liste" w 9 linii (następna po: "Sheets(2).Select"...
Błąd występuje w momencie wklejania ze schowka, pomimo tego, że aktywna jest dokładnie ta komórka, która powinna być aktywna. I najdziwniejsze jest to, że zawsze działa dobrze co drugi raz... Faktycznie sporo tych selectów. Czytałem na forach, że przez to często coś się sypie ale na razie nie wiem jak to zrobić inaczej. btw Nie wiedziałem o tej krokowej...
Przyznam się że makro jest dla mnie dośc egzotycznym pojęciem, możesz mi powiedzieć w jaki sposób je zrobić?
szablon.SaveAs Filename:=sciezka Proponuję użyć SaveCopyAs. Ale nie wiadomo, czy makro (jego nazwa sugeruje tworzenie arkuszy), czy też ma tworzyć nowe pliki.
Mały arkusz przykładowy masz w załączniku - wykorzystuje proste kopiowanie wierszy w pętli z arkusza źródłowego do docelowego. W pełni zgadzam się z przedmówcą, że tych przycisków coś za dużo - ba, sama idea kopiowania obrazków nie bardzo mi się podoba - wszak masz potem ten sam obrazek w dwóch miejscach... A znając tendencję niektórych ludzi do wklejania...
[syntax=vb]Sub Makro1() UserForm1.Show Range("A1").Value = UserForm1.TextBox1.Text End Sub[/syntax]
Sprawdź załączony plik.
skrypt wklejania wklejania obrazków wklejania zdjęć
vestel 17ips72 głośny parownik lodówka stabilizator oznaczenia
płyta indukcyjna elektrolux płyta indukcyjna elektrolux
LG MLX-240 – rodzaj podświetlenia wyświetlacza VFD, jasność, serwis, diagnostyka LG LX, LX-M340D, LX-U250 – typ wyświetlacza VFD czy LCD, diagnostyka, zamienniki
