Mirki, proszę o pomoc z VBA, nie wiem dlaczego nie działa - dopiero z tym zaczynam. Chcę aby po zakończeniu macro w poszczególnych komórkach wkleiło vlookupa. Jak nie próbuje to wywala błąd albo freezuje excela. Głowie się i wymyślić nie mogę, próbowałem różnych metod. Ostatnie linijki kodu to moje próby wklejania tego vlookupa. Ktoś coś?( ) #excel #vba

,

TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=False,
Semicolon:=False, Comma:=False, Space:=True, Other:=False, FieldInfo
Potrzebuje zmienić ten kod na taki, który będzie dzielił mi plik excela po unikalnych wartościach, które znajdują się w 3 kolumnie tzn. jak w 3 kolumnie będzie nazwa miasta to makro stworzy plik w którym będą wszystkie wartości z nazwą miasta. Pomoże mi ktoś?
Ewentualnie ma ktoś może inne podobne makro?

Sub dzielenie()

Dim siezka As String, sh As Worksheet, i As Integer

sciezka = "D:\nowy folder\"

Set sh = ActiveSheet


For
#excel #vba
Witam, stworzyłem w Excelu makro które ma działać jako korespondencja seryjna. Program działa, do wybranej komórki wkleja z danych poprawne nazwy. Jednak przy dłuższej nazwie, wyskakuje błąd informujący o przekroczonej długości tekstu (31 znaków). Można to jakoś obejść? Czy tak już to ma?
@brak_nicku: i tym zdaniem mi pomogłeś. Dzięki wielkie. Makro mi działało tak, że tworzy nowy arkusz, nazywa go imieniem i nazwiskiem zgodnym ze ściągniętymi danymi. Nie ogarnąłem, że chodzi o długość nazwy arkusza.
z ciekawości, pracuje ktoś w PL na UOP i jednocześnie w pełni zdalnie dla zagranicznej firmy na jakąś cząstkę etatu w #analizadanych?
- jak znaleźliście te druga prace? ogłoszenie w internecie?
- ile lat doświadczenia mieliście przy aplikowaniu?
- nie ma problemów z rozliczeniem takich dochodów?
- skąd firma, jakie zarobki?
- jakie odczucia?

tagi dla zasięgu
#datascience #sql #powerbi #excel #vba
@Miszcz_Joda: Kod na screenie wywala błąd, ponieważ właściwość Range dotyczy arkusza, który podałeś, natomiast właściwości Cells - skoro nie mają podanego arkusza - dotyczą innego arkusza (a którego dokładnie, to zależy od rodzaju modułu w którym kod się znajduje).
Zatem kod powinien wyglądać tak:

Worksheets("skanowane_kody").Range(Worksheets("skanowane_kody").Cells(2, 7), Worksheets("skanowane_kody").Cells(2, 7)).PasteSpecial ....
Wygląda dość paskudnie, dlatego są 2 wyjścia:
a) przypisać arkusz do zmiennej (jak sugerowane wyżej), wtedy otrzymamy:

ws.Range(ws.Cells(2, 7), ws.Cells(2, 7)).PasteSpecial ....
Zrobiłem sobie makro do planowania w MF50 (zaczytuje dane widoczne w mf50, przelicza i rozkłada wartości i wklepuje z powrotem w sapa) i spoko działa. Tylko jak jakaś lista ma więcej niż np. 200 identów to kończy się ram xD.

Próbowałem zerować zmienne, zamiast zmiennych robić na arrayach i je eraseować ale nic nie zwalnia ramu, w menadżerze zadań widać, że ram jest przypisywany do SAPa, a zwalnia go dopiero wylogowanie. Przeliczanie
Mircy mam taki problem. MAm pliczek excela gdzie pracuje na nim około 30 osób. Ostatnio ktoś nam namieszał i poprzestawiał wiersze plus powstawiał coś na filtrach - wiadomo jak excelek to sobie lubi namieszać... Doszliśmy do wniosku, że zablokujemy najbardziej newralgiczną część przed edycją, dostęp będzie miało maks 3 osoby a reszte - czyli to gdzie codziennie uzupełniają dane będzie odblokowane. Niby wszystko poszło ok ale pojawił się problem. Mam około 5
via Wykop Mobilny (Android)
  • 1
@Whatashame1: zrób część do edycji przez wszystkich w jednym arkuszu a resztę w drugim, niech się automatycznie zaciąga. Jak masz dobrze zrobiony formularz z indeksem to to że ktoś "poprzestawiał wiersze plus powstawiał coś na filtrach" nie powinno być problemem
Cześć, mam pytanie co do #vba w #excel:
wiem, że da się używać ArrayList z #dotnet tworząc takiego potworka:

Dim testHashSet As Object
Set testHashSet = CreateObject("System.Collections.ArrayList")

Jest jakiś sposób aby w jakikolwiek sposób użyć HashSet z System.Collections.Generic?
Pisze kod w #vba w którym pobieram dane z wybranego arkusza, wstawiam do arraya i potem po przekształceniach wstawiam ten array do nowego arkusza. Jedna z moich kolumn zawiera wartości takie jak "1/2015”, "10/2020" czy "30/2010" i nieważne co zrobię, w nowym arkuszu zamienia się to na daty (te 30/2010 się nie zmieniają, bo nie ma 30 miesięcy w roku).
Jak mogę przekonwertować te dane na stringa żeby to gówno się nie
#vba #excel #programowanie #pytanie

Np. mam makro ktore do komorki A1 wpisuje formule =2+2. Czy jest mozliwosc zeby po wpisaniu przez marko tego dzialania uruchamiac w tej komorce dzialanie klawisza F9. Jak wpisze =2+2 to wskakuje 4 w komorce, ale tak jak by ta formula =2+2 jest dalej ukryta, i chcialbym to zamienic w locie zeby w komorce bylo 4 od razu.
#vba #excel #pytanie #programowanie

Hej, mam pytanie, jak zrobic w vba zeby z jednej kolumny usunac duplikaty ALE oprocz jednego ktory ma zostać i ma sie potwarzac. Mam kolumne numerow ktorej musze usunac zduplikowane, ale czasami zamiast numeru jest No Data i chcialbym jakos za pomoca makro usuwac zduplikowane numery ale zostawiac No Data.
@brak_nicku: tak chce miec unikaty + wszystkie No Data w kolumnie. Najlepiej w oryginalnym miejscu.

Dodam ze normalnie to sortuje cala tabele wedlug numerow (tak ze No Data mam na samym dole), zaznaczam nastepnie tabele (tylko to wiersze ktore maja numerki) i daje data -> remove duplicates i sie kasuje. I sie wlasnie zastanawiam czy daloby rade makro zrobic, zamiast ciagle klikac.
I sie wlasnie zastanawiam czy daloby rade makro zrobic, zamiast ciagle klikac.

Dałoby, a sposobów na to jest bardzo dużo. Najprostsze wyjście to
a) policzyć N, na przykład countif ile jest "no data"
b) usunąć duplikaty z całej kolumny
c) dopisać No data razy N - 1

Albo tak jak robisz teraz - tylko jeszcze łatwiej posortować malejąco, wtedy No Data będzie na początku, policzyć ile jest no data (jak wyżej) i
Cześć, mam pytanie- jak zmienić kolor komórki za pomocą funkcji?

Takie coś działa mi bez problemu:

Sub cc()
Range("A1").Interior.ColorIndex = 20
End Sub

Ale takie coś ni cholery nie chce:

Function cl(col As String)
Range("A1").Interior.ColorIndex = 7
cl = col
End Function

WTF?

#vba #excel
via Wykop Mobilny (Android)
  • 5
Jezu, mam na studiach babę od programowania, która każe pisać na zajęciach kod na tablicy bez zerkania w swoje notatki, a na kolokwium pisać na kartce.
Na następnym zjeździe spróbuję ją przekonać do przepisania oceny z poprzednich studiów, bo miałem przedmiot o podobnej nazwie. Wszystkiego się mogę nauczyć, ale kuć na blachę kod w VBA, gdzie do zmiany koloru komórki trzeba napisać 15 słów, no kurde nie.
Inb4 to nie informatyka, programowanie
Mam pytanie:

Próbuję w vba wykonać formularz, w którym po wybraniu danego parametru w comboxie (w tym wypadku "210"), w następnym ma pobrać dane z tabeli, która będzie zawierać 2 pozycje (R1, R2). Sama tabela jest nazwana w excelu jako "TABROBOT2"

Aktualnie mam to zrobione w taki sposób:

If CBSTACJA.Value = "210" Then
'CB
ROBOT.List = Array("R1", "R2")
End if

Jak powinienem to pozmieniać bym mógł użyć "TABROBOT