Wszystko
Najnowsze
Archiwum
- 2
@DarkAlchemy: DZIAŁA! dzięki max, jestem Ci winny przysługę, rozwiązałeś w kilka minut problem z którym się zmagałem ponad godzinę ;)
Mirki, mam pytanie: Mam takie zapytanie SQL, które nie działa:
strSQL = "SELECT * FROM [TestData$D1:D109]" & _
"WHERE [???] = 'K' "
Jak wskazać programowi, że chcę tylko komórki z wartością K? Cells? Fields?
strSQL = "SELECT * FROM [TestData$D1:D109]" & _
"WHERE [???] = 'K' "
Jak wskazać programowi, że chcę tylko komórki z wartością K? Cells? Fields?
- 0
konto usunięte via iOS
- 3
Komentarz usunięty przez autora
@AniaKowalska: to zależy o co pytasz. Jeżeli chodzi o umiejętności VBA/SQL/Python/R, to szkoła nie dała mi totalnie nic, wszystkiego nauczyłem się sam. Szkoła dała mi dyplom, na który patrzą pracodawcy.
Mirki, pomóżcie. Mam jeden arkusz z danymi w tabeli i chciałbym za pomocą SQLa wykonać określone komendy na tej tabeli. Czy takie coś można zrobić w domyślnym kompilatorze VBA? Nie używając języka VBA tylko SQL (SELECT cośtam cośtam) #vba #sql #naukaprogramowania
- 1
#excel #vba
Mirki, potrzebuję podszkolić się z VBA. Zastanawiam się nad kupnem książki w celu wsparcia. Mozecie mi coś doradzić?
Na allegro widziałem coś takiego:
http://allegro.pl/excel-2016-pl-programowanie-w-vba-i7285323571.html
jest tez dla excela 2010 i 2013 - czym to się różni? Czy język VBA(ilość komend itd) zmieniła się w danych wersjach excela?
Mirki, potrzebuję podszkolić się z VBA. Zastanawiam się nad kupnem książki w celu wsparcia. Mozecie mi coś doradzić?
Na allegro widziałem coś takiego:
http://allegro.pl/excel-2016-pl-programowanie-w-vba-i7285323571.html
jest tez dla excela 2010 i 2013 - czym to się różni? Czy język VBA(ilość komend itd) zmieniła się w danych wersjach excela?
A jak Excel dostaje nową funkcję, to nie dostaje odpowiednika w VBA?
@Polinik: o tym napisałem w drugim zdaniu, tylko to nie jest zmiana języka, a rozszerzenie biblioteki. Jedyna zmiana VBA w ostatnich latach dotyczyła obsługi 64-bit w wersji 7.1.
@Michotok: polecam nie kupować książki tylko sprawdzić materiały na wiseowl.
Zrobilem proste makro ktore kopiuje mi date znad danymi i wkleja obok, wszystko dziala tylko problem tkwi gdy miesiac jest krotszy i w ostatnich kolumnach makro przesuwa kolumne i kopiuje date 01-01-1900 :( dodatkowo mam wrzucona formule selection end down i wrzuca ta date do calej kolumny w excelu :/ jak zrobic ze gdy nie ma daty, to niech makro nic nie robi?
#excel #vba #makro
#excel #vba #makro
- 2
@BigBlackSausage: if cell = vbnullstring then
Komentarz usunięty przez autora
- 1
@AndrewSzusty: Jasne. Dorywcza oczywiście to jest w nieregularnych dniach/godzinach. Tutaj miałam na myśli dorywczą, że na chwilę tylko :) Nie ja dyktuję warunki finansowe, do 30 netto obawiam się że nie dojdzie, ale jak napisałam - do negocjacji (nie ze mną).
Daję propozycję, jak ktoś chętny to super, jak nie..życie toczy się dalej (⌐ ͡■ ͜ʖ ͡■)
Daję propozycję, jak ktoś chętny to super, jak nie..życie toczy się dalej (⌐ ͡■ ͜ʖ ͡■)
Jak mnie to #vba w-----a. Prymitywny kod do automatyzacji prymitywnego narzedzia, czym tu sie podniecac
- 1
Hej,
Mam pytanie czy jest możliwość, aby spin button zmienial swoja wartosc min, max w zaleznosci co wybierze się z listy rozwijanej w danej komorce? Mam z tym problem ponieważ mam do wyboru 2 opcje z listy rozwijanej, która aktualizuje drugą listę rozwijaną (jedna lista jest większa od drugiej). Spin button mam tak ustawiony, że jeśli przekroczy daną wartość max to wraca to wartości 1 i na odwrót. Jak ustawić wartość min
Mam pytanie czy jest możliwość, aby spin button zmienial swoja wartosc min, max w zaleznosci co wybierze się z listy rozwijanej w danej komorce? Mam z tym problem ponieważ mam do wyboru 2 opcje z listy rozwijanej, która aktualizuje drugą listę rozwijaną (jedna lista jest większa od drugiej). Spin button mam tak ustawiony, że jeśli przekroczy daną wartość max to wraca to wartości 1 i na odwrót. Jak ustawić wartość min
- 3
@Tomz:
Private Sub ComboBox1_Change()
If Me.ComboBox1.Value = 1 Then
Me.SpinButton1.Min = 1
Me.SpinButton1.Maxtak, moja lista rozwijana jest zrobiona przez sprawdzanie poprawności danych chyba zapomnialem o tym wspomniec, a wydaje sie to kluczowe ;)
@Tomz: W tym wypadku trzeba obsłużyć zdarzenie Change arkusza, np. taki kod wkleić do modułu arkusza w którym są listy:
Private Sub Worksheet_Change(ByVal Target As Range)
On Error- 2
Mircy pomocy! Myślałem, że już jestem bliski skończenia makra do automatyzacji generowania raportów tymczasem utknąłem. Makro ma za zadanie stworzenie raportów na bazie tabeli obrobionej w Power Query. W pętli iteruję po parze kategorii (wartościach w dwóch kolumnach). W każdym kroku podkładam wspomniane kategorie do zapytania SQLowego 'Command textu' (dodatkowa komenda WHERE) we właściwościach 'Workbook Connections' co dość szybko filtruje mi bazową tabelę. Do przefiltrowanej tabeli podpięte są Pivot Charty które z
Mirki spod tagu #vba i #excel pomożecie z jednym makrem?
Mam taki kod jak poniżej. Ma mi on czyścić komórki z zakresu E5:G5 jeśli C5 jest puste. Jak to przerobić na takie, żeby robiło to samo aż do C14? Czyli czyści E6:G6 jak C6 jest puste itd. (bez kopiowania kodu 10 razy ( ͡° ͜ʖ ͡°) )
If VarType(Range("C5"))
Mam taki kod jak poniżej. Ma mi on czyścić komórki z zakresu E5:G5 jeśli C5 jest puste. Jak to przerobić na takie, żeby robiło to samo aż do C14? Czyli czyści E6:G6 jak C6 jest puste itd. (bez kopiowania kodu 10 razy ( ͡° ͜ʖ ͡°) )
If VarType(Range("C5"))
@OrzelKaskader: chyba najprościej byłoby użyć pętli for, i osobnego arkusza w którym zdefiniujesz sobie puste komórki i odpowiadające im komórki do czyszczenia
- 2
@OrzelKaskader:
For r = 5 To 14
If Cells(r, 3) = "" Then
Range(Cells(r, 5), Cells(r, 7)) = ""
End If
Next rco ma z tym wspólnego VPN - niestety nie
@brak_nicku: Czyli niewiele zrozumiales z mojego pytania... trudno, mialem nadzieje ze trafilem. Sciana tekstu z ktorej niewiele wynika szkoda ze nie na temat, bo ja o BI a Ty o VBA i ActiveX i pytasz o jakie trudnosci mi chodzi... Manualne instalowanie czy konfigurowanie sterownikow baz danych przy Office BI? Pracuje na standardowym sprzecie, bez udziwnien.
Czyli niewiele zrozumiales z mojego pytania
@papapapuga: tak, sam się do tego przyznałem, resztę przemilczę.
- 1
Czy jest ktoś w stanie napisać makro i się nim podzielić ( ͡° ͜ʖ ͡°) które będzie "symulowało" aktywność? Pracujący w tle excel z tego linku https://www.wykop.pl/wpis/19653851/jest-ktos-wstanie-mi-skrobnac-makro-ktore-mialoby-/ napisany przez @gen_mielec @polinik niestety nie wystarcza ( ͡° ʖ̯ ͡°) Myślałem o tym, aby co parę sekund excel maksymalizował okienko a potem chował się do paska. Niestety nie mam pomysłu na takie makro.
#
#
- 2
- 0
Zainteresowanym osobą podeślę jak to teraz wygląda
Treść przeznaczona dla osób powyżej 18 roku życia...
- 1
#excel #vba
Czy jest jakaś opcja na zamienienie czegoś takiego jak w obrazku na liczby? Mam albo miesiac.liczba albo liczba.miesiac, gdzie w pierwszym przypadku chciałbym jeszcze odwrócić rzeczy które są między kropkami. Dostałem cholernie dziwny plik csv i nie wiem jak sobie poradzić, a danych jest cholernie dużo.
Czy jest jakaś opcja na zamienienie czegoś takiego jak w obrazku na liczby? Mam albo miesiac.liczba albo liczba.miesiac, gdzie w pierwszym przypadku chciałbym jeszcze odwrócić rzeczy które są między kropkami. Dostałem cholernie dziwny plik csv i nie wiem jak sobie poradzić, a danych jest cholernie dużo.
źródło: comment_WhzVrbi9J9zQvaiT7KUwioRxn7aSKCPn.jpg
Pobierz@miud: no ja bym formatowanie zmienili, prawdopodobnie masz tam 43.001, in zmienia to na date wg jakiegos dzinwego formatu
@miud: Najpierw wprowadź tę formułę, gdzie A1 to komórka z danymi:
(tłumacz tutaj: http://www.piuha.fi/excel-function-name-translation/index.php?page=jezyk-polski-english.html )
Potem zrób zamianę 12 tekstów na liczby :)
=JEŻELI(JEŻELI.BŁĄD(LEWY(A1;1)*1;"L")="L";PRAWY(A1;DŁ(A1)-ZNAJDŹ(".";A1))&"."&LEWY(A1;ZNAJDŹ(".";A1)-1);A1)(tłumacz tutaj: http://www.piuha.fi/excel-function-name-translation/index.php?page=jezyk-polski-english.html )
Potem zrób zamianę 12 tekstów na liczby :)
Należy obsłużyć zdarzenie Change arkusza, taki przykładowy kod wklejony do modułu arkusza:
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo CleanUp
Application.EnableEvents = False
Target.Value2 = Replace(Target.Value2, "xxxx", "yyyy")- 2
- 2
Treść przeznaczona dla osób powyżej 18 roku życia...
@Jefrey: weź to zobacz: https://social.msdn.microsoft.com/Forums/en-US/78eeab51-f39e-423c-8afc-ebd218d658c3/how-to-make-vba-to-read-and-understand-characters-in-other-keyboard-language?forum=isvvba
"Finally I found solution.. it simple, so if someone need this here it is>>>
1.In Control Panel > Regional and language options> advanced tab
choose the native language you want to use in language for
"Finally I found solution.. it simple, so if someone need this here it is>>>
1.In Control Panel > Regional and language options> advanced tab
choose the native language you want to use in language for
- 0
@lewekleonek: Przegrzebałem wszystkie opcje regionalne i rzuciło mi się to w oczy. Dzięki, spróbuję, idę poszukać kogoś z hasłem admina, bo tu panie ciężko samemu tapetę zmienić :)
















Cześć,
Mam baze w accessie, a w niej pare zahasłowanych modułów z makrami ale problem polega na tym, że robiłem to już jakiś czas temu i zapomniałem passów... Czy można jakoś odzyskać te hasła nie używając żadnego zewnętrznego oprogramowania?