Potrzebuję makro które będzie kopiowało i wklejało dane z komórki w zależności od tego czy w komórce obok znajduje się wartość spełniająca warunek. Czy byłby w stanie ktoś pomóc? #vba #excel #programowanie #pracbaza
Wszystko
Najnowsze
Archiwum
@gacek1197: A próbowałeś
=JEŚLI(warunek;prawda;fałsz)?- 0
@gacek1197: jeżeli tych obszarów jest na tyle dużo, że nie chce Ci się wstawiać formuł przepisujących, to szybkie makro z 1 pętlą, która przelatuje przez A1 -> Ax i jeżeli trafi na komórkę niepustą lub z konkretnym napisem, to bierze liczbę z nazwy kolumny dokleja ją do B i tam wstawia wartość.
- 0
Czy ktoś się spotkał z takim błędem przy odświeżaniu tabeli przestawnej ?
źródłem TP jest zapytanie PQ
Nie możemy uzyskać danych z modelu danych. Komunikat o błędzie:
Wystąpił nieoczekiwany błąd (plik ,,pcminorojcoll.inl", wiersz 109, funkcja "PCMinorObjectCollection::SetNameAndUpdateCollection").
#excel #vba #analizadanych
źródłem TP jest zapytanie PQ
Nie możemy uzyskać danych z modelu danych. Komunikat o błędzie:
Wystąpił nieoczekiwany błąd (plik ,,pcminorojcoll.inl", wiersz 109, funkcja "PCMinorObjectCollection::SetNameAndUpdateCollection").
#excel #vba #analizadanych
źródło: comment_U95l4zH5YGzchIWA4puJ7691k9pfieOa.jpg
Pobierz- 1
Treść przeznaczona dla osób powyżej 18 roku życia...
- 5
@mulen: słowo klucz, tabela przestawna
Komentarz usunięty przez autora
- 0
@wenszu87: bo rejestrator sie wysypie juz przy nagrywaniu akcji tworzenia nowego pliku. Pozatym nagranie takiego procesu sprawia, ze w kodzie wszystko jest na sztywno "hardcoded" przez co i tak nagrane makro przydałoby sie poprawić w edytorze.
Jak ogarniasz angielski to polecam "vba for dummies". Wszystko wytlumaczone jak dla dziecka i mi bardzo na początku pomogło ogarnąć co i jak.
Jak ogarniasz angielski to polecam "vba for dummies". Wszystko wytlumaczone jak dla dziecka i mi bardzo na początku pomogło ogarnąć co i jak.
@wenszu87
WiseOwl na YouTube
WiseOwl na YouTube
- 2
Mireczki,
Kojazycie moze kogos z youtuba, facebooka lub innych stron spolecznosciowych co opwiadaja o excelu ?
P.s. Nie wazne w jakim jezyku
Kojazycie moze kogos z youtuba, facebooka lub innych stron spolecznosciowych co opwiadaja o excelu ?
P.s. Nie wazne w jakim jezyku
źródło: comment_H4EKrzNmhjwb5RJXWT12cTpXkhkPgcG0.jpg
Pobierz@zadnoo: to tak na szybko,
(1) ExcelIsFun dobry i chyba największy na youtube
(2) MrExcel - popularny
(3) Excel For Freelancers - zawiera bardziej rozbudowane projekty
(4) pmsocho - solidny polski kanał
(1) ExcelIsFun dobry i chyba największy na youtube
(2) MrExcel - popularny
(3) Excel For Freelancers - zawiera bardziej rozbudowane projekty
(4) pmsocho - solidny polski kanał
- 1
@m1600: danke
- 0
@wiaderkoo: sam nie próbowałem, kolega na pewno to robił, ale i google ma rozwiązanie, np. https://itproblemy.pl/questions/1026483/is-there-a-way-to-crack-the-password-on-an-excel-vba-project
- 0
@wiaderkoo: z widoku projektu nie będzie widać, ale wystarczy przecież że z innego modułu się odwołam do tego konkretnego pliku i sobie wyciągnę nazwy wszystkich arkuszy.
- 0
Mam taki kod:
Sub makro1()Dim LR As LongLR = Cells(Rows.Count, ActiveCell.Column).End(xlUp).Row - 1ActiveCell.FormulaR1C1 = "=SUBTOTAL(3,R[2]C:R[" & LR & "]C)"@Defender: Jeżeli makro ma działać na dowolnym aktywnym arkuszu, zamień ActiveCell na Range("A1") (lub w skróconej formie na [A1]). Jeśli chcesz, żeby działało tylko na jakimś konkretnym, użyj Sheets("nazwa akrusza").Range("A1") lub ['nazwa arkusza'!A1].
- 0
@DwaNiedzwiedzie: Nie ma tematu! Już poprawiłem. Serdeczne dzięki za pomoc. :-)
Prawidłowy kod:
Prawidłowy kod:
Sub makro1()Dim LRHej,
czy ktos moze mi pomoc. Jak przez VBA osiagnac "Result" czyli zeby mi po prostu zliczał tak jak przez COUNTIF w arkuszu.
Wkleilem formule po prostu ale nie daje mi to spokoju ze nie wiem jak to przez VBA ogarnac. Pomoze ktos?
doszedlem
czy ktos moze mi pomoc. Jak przez VBA osiagnac "Result" czyli zeby mi po prostu zliczał tak jak przez COUNTIF w arkuszu.
Wkleilem formule po prostu ale nie daje mi to spokoju ze nie wiem jak to przez VBA ogarnac. Pomoze ktos?
doszedlem
źródło: comment_zFTzNMyPIylmXHJb1iFEXwrq74HFbueb.jpg
Pobierz@KwasneJablko: Odpalasz Sub o nazwie test() i on zaznacza sobie pierwsza wolna komorke w wybranej kolumnie i potem po kolei oblicza
Witam potrzebuje programu/funkcji która odwraca wyrazy w zdaniu. Ma to wyglądać tak Ala miała wielkiego kota = alA ałaim ogeikleiw atok
#excel #vba #programowanie #office #szyfrowanie #programista15k
#excel #vba #programowanie #office #szyfrowanie #programista15k
- 1
@Daniell236: Podziel stringa na osobne wyrazy używając splita: https://docs.microsoft.com/pl-pl/dotnet/api/microsoft.visualbasic.strings.split?view=netframework-4.8 Zastosuj StrReverse do każdego wyrazu z osobna a potem połącz z powrotem w jedno zdanie. Masz taki pseudo kod:
Dim Arr() As String = Split(ActiveCell.FormulaR1C1)
Dim Text As String = ""
For i As Integer = 0 To Arr.Length
Dim Arr() As String = Split(ActiveCell.FormulaR1C1)
Dim Text As String = ""
For i As Integer = 0 To Arr.Length
Sprzedam książkę Excel 2010 programowanie w VBA. Używana, wytarte rogi. Wnętrze nie zniszczone. Cena do uzgodnienia.
#sprzedam #ksiazki #programowanie #vba #excel
#sprzedam #ksiazki #programowanie #vba #excel
źródło: comment_Rr9eh1j6iihKWyTKGiDNsI6aTGqWUnTQ.jpg
Pobierz- 1
@partisan: To dzięki :) Jednak kupie 2013. Dzięki za inspiracje :)
- 0
@konik_polanowy: Jestem prostym człowiekiem, widzę dobry content, daję plusa
Siema mirki. Mam problem w vba, odrazu mowie ze jestem amatorem. Próbuję napisać makro, żeby w excelu scalało mi komórki w taki sposob: c2 i c3, pozniej d2 i d3 do momentu az trafia na jakąś niepustą komórkę. Kod wyglada tak:
Range("c2" ," c3"). Select
Do while activecell= ""
Selection. Mergecells = true
Selection. Offset(1,0).select
Loop
Range("c2" ," c3"). Select
Do while activecell= ""
Selection. Mergecells = true
Selection. Offset(1,0).select
Loop
@WscieknietyWaz: użyj dodatkowo Selection.Resize(2, 1).Select
- 0
@uczeniemaszyn działa, dzięki :D
@michal0110: Do zrobienia, choć warto rozważyć opcję połączenia wszystkich warunków, wyciągnięcia pełnych danych jednym zapytaniem i rozbicia ich już po stronie VBA - wszystko zależy od szczegółów, których niewiele tu podałeś. Rozważ też Power Query, tam to zapewne będzie dużo łatwiejsze do zrealizowania.
@michal0110: dokładnie, w PQ zrobisz to bez najmniejszego problemu
#excel #vba
Polecicie od siebie jakiś kurs bądź książkę związaną z VBA?
Działałem kiedyś w VBA jednak po sporej przerwie muszę wszystko ogarnąć od początku.
Robie aktualnie ten kurs:
https://www.udemy.com/excel-vba-programming/
ale nie jestem z niego zadowolony, bo jest dosyć specyficzny.
Polecicie od siebie jakiś kurs bądź książkę związaną z VBA?
Działałem kiedyś w VBA jednak po sporej przerwie muszę wszystko ogarnąć od początku.
Robie aktualnie ten kurs:
https://www.udemy.com/excel-vba-programming/
ale nie jestem z niego zadowolony, bo jest dosyć specyficzny.
- 2
- 1
Może dlatego, że nie jestem typowo ścisłowcem.
@bart_212: W takim razie dużo bardzie przypadnie Ci do gustu WiseOwl z Youtube. Bardzo dobrze i na spokojnie tłumaczy. Zawsze wszystko krok po kroku. Jest przy tym bardzo spójny i wprowadza w optymalnym tempie coraz to trudniejsze zagadnienia w danym temacie.
Sam w trakcie nauki nikogo lepszego od niego nie znalazłem.
- 0
#vba #excel #korposwiat #pracbaza #capgemini
Mirki czy ktoś z was pracuje w Kapciu lub miał tam test z VBA? Jak to wygląda, na ile trzeba ogarniać i jaki poziom trudności pytań?
Mirki czy ktoś z was pracuje w Kapciu lub miał tam test z VBA? Jak to wygląda, na ile trzeba ogarniać i jaki poziom trudności pytań?
Warto zwrócić uwagę na kursy z #linkedin? Np. z #sql #excel #vba itd? Generalnie tematy zmierzające w kierunku #datascience science, może #bigdata? #kiciochpyta #udemy #kursyudemy
- 0
@Analitykzbozejlaski1_-: kursy linkedin to dawna lynda.com, mialem kilka razy tak że i tak nie było żadnych alternatyw w Polsce
- 0
@plushy: jakieś konkretne źródla wiedzy do nauki polecasz? Repozytoria? Książki z tej matmy, matmy, matmy? ( ͡° ͜ʖ ͡°)
Mam pytanko, bo ostatni raz coś bardziej skomplikowanego w excelu robiłem z 5 lat temu i nic już nie pamiętam.
W skrócie: mam 5 plików, w których jest kilka kolumn, przy czym mnie interesują trzy: Imię, Nazwisko i wynik, gdzie jest wartość liczbowa w zakresie 1-10. Co ważne imiona i nazwiska w każdym pliku niekoniecznie się pokrywają, w jednym może być 50 rekordów, w drugim 60 i mogą być w innej kolejność.
W skrócie: mam 5 plików, w których jest kilka kolumn, przy czym mnie interesują trzy: Imię, Nazwisko i wynik, gdzie jest wartość liczbowa w zakresie 1-10. Co ważne imiona i nazwiska w każdym pliku niekoniecznie się pokrywają, w jednym może być 50 rekordów, w drugim 60 i mogą być w innej kolejność.
@SKYFander: jeśli lista wszystkich osób jest stała (bez względu w jakich plikach występują) to wystarczy kilka podstawowych formuł (JEŻELI+INDEKS+PODAJ.POZYCJĘ), jeśli nie to w grę wchodzi VBA albo Power Query, ale pewnie "gotowego szablonu" nie znajdziesz.
@SKYFander: J/w - w najprostszym wariancie w Power Query to trzy kroki do wyklikania z menu (wskazanie folderu z plikami, rozwinięcie zawartości arkuszy, usunięcie zbędnych kolumn). Po zmianie plików źródłowych wystarczy odświeżyć tabelę z wynikami.
Treść przeznaczona dla osób powyżej 18 roku życia...
@konik_polanowy: Jestem prostym człowiekiem, widzę dobry content, daję plusa.
@dan3k: Sam jesteś bot :P
Regularność wpisów wpadła, bo poświęcam więcej czasu na ważniejsze sprawy niż wykop ( ͡° ͜ʖ ͡°)
Regularność wpisów wpadła, bo poświęcam więcej czasu na ważniejsze sprawy niż wykop ( ͡° ͜ʖ ͡°)
- 6
Przypominam, że tylko do jutra jest -60% na kursy wideo programistyczne w języku polskim. Poniżej lista tytułów z cenami, autorami i linkami do zakupu. Trochę tego jest. Do dużej części kursów są ebooki gratis:
#git. Kurs video. Pracuj wygodnie z najpopularniejszym systemem kontroli wersji. Kurs video. Marcin Biegała obniżka z 59,00 zł na 23,60 zł LINK
#python 3. Kurs video. Praktycznie wprowadzenie do programowania. Kurs video. Adam Bobowski obniżka
#git. Kurs video. Pracuj wygodnie z najpopularniejszym systemem kontroli wersji. Kurs video. Marcin Biegała obniżka z 59,00 zł na 23,60 zł LINK
#python 3. Kurs video. Praktycznie wprowadzenie do programowania. Kurs video. Adam Bobowski obniżka
źródło: comment_hQOJJ3w3BR8rACOVzEtLpJXXfDGAeraG.jpg
Pobierz


























Mirki, proszę o pomoc. Czemu mi ten kod nie działa?
Dodam, że jest on uruchamiany w ramach zdarzenia Workbook_BeforeClose (ale z innego skoroszytu, niż "Raport").
Błąd to subscript out of range
Najbardziej trywialny i najczęściej występujący przykład, kod typu:
Range("A1") = zmiennazmienna = Range("A1")Jest prawidłowy, skompiluje się i zadziała, ale w praktyce nie powinien wystąpić, bo jego działanie jest uzależnione od tego, gdzie