@dwuwarstwowy: a jakie typu są wartości w polach c1 i d1? Masz zadeklarowaną zmienną "co" jako Variant, "ko" jako String, w obu przypadkach przypisania wartości tym zmiennym powinno być Range("X1").Value, poza tym używanie samego "Range", bez określenia jakiego arkusza dotyczy może być niebezpieczne
  • Odpowiedz
@spontanicznosc: no to tworzysz trzecią tabelą, w której wpisujesz

=A1*D1
lub

=Jeżeli(A1*D1>0;A1*D1;"")
Przeciągasz na odpowiedni wymiar i gotowe. Teraz wracam do pytania zadanego wcześniej - co jest złego w tym rozwiązaniu, co wymagałoby usprawnienia za pomocą VBA?
  • Odpowiedz
#excel
dobra mircy, teraz konkret
Jak wszystko poustawiać, jeżeli chcę z arkusza zrobić "jakby aplikację"? tj. najlepiej żeby się żadne kontrolki excelowe nie wyświetlały (pasek formuły itp.), byłoby tylko pole, gdzie można wpisać dane i z innego pola chciałbym umożliwić kopiowanie. Całą resztę najlepiej zablokować.
wolałbym żeby nie trzeba tego zapisywać jako xlsm
#office #biuro #komputery zawołam też #vba
  • 1
  • Odpowiedz
  • Otrzymuj powiadomienia
    o nowych komentarzach

Mirki wiem, że nie uważacie VBA za język programowania, ale pytam ze względu na Waszą ewentualną wiedzę o rynku szkoleń: czy jest zapotrzebowanie na szkolenia z Excela i (przede wszystkim) VBA oraz tworzenie gotowych rozwiązań dla firm w tym zakresie? Zastanawiam się nad założeniem działalności.
#programowanie #excel #vba
  • 23
  • Odpowiedz
  • Otrzymuj powiadomienia
    o nowych komentarzach

w korpo:
- panie kierowniku chciałabym szkolenie z Excela/VBA
- no ale Zośka przecież pisałaś w CV że ogarniasz Offica..

w małej firmie:
- szefie chciałabym szkolenie z Excela/VBA
  • Odpowiedz
@hithat: excel jest potezny. Dla jednej grupy ludzi to tylko tabelka z cyferkami dla drugiej to potezne nazedzie ktore juz znaja. Jedni nie wydadza pieniedzy na tabelke inni nie wydadza na to co znaja.

Taka moja opinia. Nie wytlumaczysz ze to cos wiecej niz tabelka.
  • Odpowiedz
Mirki powoli staram się nauczyć VBA znajdując w necie różne samouczki i przekształcając je w różny sposób. Ten oto kod:
http://excelvbatutor.com/vba_chp7.htm
Zamieniłem w ten, jednak nie wiem co napisać aby nie wyskakiwał error gdy kod zostanie użyty na literach. Może ktoś pomoże

Private Sub CommandButton2_Click()
Dim mark As Integer
  • 1
  • Odpowiedz
  • Otrzymuj powiadomienia
    o nowych komentarzach

Odpowiadam sam sobie, może ktoś kiedyś trafi na ten kod i będzie miał podobny problem.

If Not IsNumeric(ActiveCell.Value) Then
MsgBox ("Podana wartość nie jest liczbą")
Exit Sub
End If
  • Odpowiedz
Pewnie prosta sprawa, ale... Jest mi ktoś w stanie podpowiedzieć jakiej użyć metody, żeby każdy kolejny obszar zamalowany przez tę pętlę był malowany innym kolorem z indeksami np. od 1 do 5? Bo zdaje się, że jakąś kolejną prostą pętlą nie da się tego zrobić? W każdym razie moje próby na nic się zdają. Za to już kilka razy zagotowałam moc przerobową excela. ( ͡° ʖ̯ ͡°)

Sub zadanie4.34()

For i =
  • 3
  • Odpowiedz
  • Otrzymuj powiadomienia
    o nowych komentarzach

@janekwoz: Czyli jednak jeszcze prostsze. Za bardzo się skupiłam na myśli, żeby kolor oznaczać inną zmienną i mi umknęło całkiem to rozwiązanie. W tym przypadku faktycznie wystarcza. Dzięki!
  • Odpowiedz
Są tu jakieś spece od #vba dla #excel? #programowanie coś tam liznąłem, ale z vba właśnie zacząłem w tej chwili z musu.

Ktoś skuma co chciałem tym osiągnąć i powie mi jak bardzo się mylę?

For each Sheet in Worksheets
  • 10
  • Odpowiedz
  • Otrzymuj powiadomienia
    o nowych komentarzach

@Burencjusz: prawie dobrze, jedna linijka zbędna, w drugiej brakuje spacji, i coś tam może być zbędne, ale parafrazując:

tona ch się udzielasz?! ( ͡° ʖ̯ ͡°)


tona ch robisz wpis, skoro nie zadajesz konkretnych pytań?
  • Odpowiedz
#vba #programowanie

Mirki klikające cośtam w makrach vba, mam taką wewnętrzną potrzebę zrobienia szablonu w Wordzie w którym należy podmienić formy grzecznościowe, imię i nazwisko w tekście listu powitalnego. Żaden problem, zrobiłem sobie formatkę która prosi o podanie danych i zastosuje je w tekście dokumentu. I teraz mam wrażenie, że możnaby to zrobić eleganciej niż przez search and replace całego tekstu - ja lubię używać dedykowanych pól tekstowych,
  • 2
  • Odpowiedz
  • Otrzymuj powiadomienia
    o nowych komentarzach

  • 0
@padobar: alez oczywiscie. Chodzilo mi o maksymalne uproszczenie dla moich laicznych wspolpracowniczek - odpalasz dokument, automatycznie odpala sie forma z polami do wypełnienia, klikasz ok i masz gotowy dokument. Przy korespondencji wiem jak to zrobic przez edycje zrodla danych, nie wiem czy da sie z wlasna userforma vba.
  • Odpowiedz
Jest możliwość, żeby w #excel #vba pobrać dane z sieci web i zmienić ich kodowanie? To pierwsze udaje mi się zrobić oczywiście.

Ewentualnie żeby excel pobrał plik, zapisał go (wszystko w tle), żeby później użyć 'dane z pliku' gdzie możliwość zmiany kodowania istnieje?
  • 1
  • Odpowiedz
  • Otrzymuj powiadomienia
    o nowych komentarzach

#vba #prostealenieumiem #programowaniedlaulomnych #niejesteminformatykiem

Wydaje mi się, że to banalna rzecz, ale niestety sam nie wiem jak to zrobić. W VBA pisząc funkcję muszę zastrzec, że argumenty funkcji muszą być >= 0 (słownie: większe lub równe zero; inaczej: nie mogą być mniejsze od zera). Próbowałem wstawić w IF Then Inputboxa przy wartościach < 0, tak żeby potem wpisywało się nową wartość, ale nie wiem
  • 1
  • Odpowiedz
  • Otrzymuj powiadomienia
    o nowych komentarzach

Mirki drogie, mam pytanie. Męczę się już z tym dosyć długo i jestem dosyć poddenerwowany.

Mam w Excelu (VBA) funkcję, której zadaniem jest wykonanie prostego selecta na bazie i wrzucenie go do odpowiedniej komórki. Jestem pewny, że recordset nie jest pusty, bo robiłem sobie w pętli msgboxy, które wyświetlały się tyle razy ile w bazie jest rekordów. Problem jest taki, że nie działa mi już same wrzucanie wyniku w wyznaczone miejsce (Worksheets("database").Range("C35").CopyFromRecordset
  • 1
  • Odpowiedz
  • Otrzymuj powiadomienia
    o nowych komentarzach

Pytanie mam. Da się zrobić w excelu pole wyboru które będzie się rozwijać i z wybranej listy będzie można wybrać daną pozycję z przypisaną do niej wartością?

DLa przykładu. Lista do zamawiania danych produktów, ze stałego asortymentu. Potrzebujemy kupić np kapustę, drewno i ajerkoniak, klikamy w pole a tam jest kapusta, drewno ajerkoniak, tratwa i kula do burzenia budynków. Wybieramy trzy pierwsze i formuła tworzy listę podliczając podpięte pod produkty ceny, np
  • 5
  • Odpowiedz
  • Otrzymuj powiadomienia
    o nowych komentarzach

Mirki pomocy, muszę dodać poniższe zdarzenie automatycznie do wybranego arkusza, jakieś rady?

Ogólnie potrzebuje czegoś co będzie mi odpalało makro kiedy będzie zmiana w komórce A1.

Private Sub Worksheet_Change(ByVal Target As Range)

If
  • 1
  • Odpowiedz
  • Otrzymuj powiadomienia
    o nowych komentarzach

#excel #vba #niespieborobieexcele

Mirki głowie się nad funkcją VBA podobną do vlookup. Funkcja działałaby identycznie z tym, że kopiowała by znalezioną komórkę a nie zwracała tylko jej wartość. Właściwe to mogłaby się nazywać WYSZUKAJ.PIONOWO.HIPERŁĄCZE bo do tego potrzebuje jej używać.

Jakieś pomysły podpowiedzi?
  • 7
  • Odpowiedz
  • Otrzymuj powiadomienia
    o nowych komentarzach

Kod:

Cells(Rows.Count, "A").End(xlUp).Select
zaznacza ostatnią komórkę, która nie jest pusta w kolumnie A;

Cells
  • 2
  • Odpowiedz
  • Otrzymuj powiadomienia
    o nowych komentarzach

@scorpio18k:

Rows.count zwraca ostatni wiersz arkusza (dla Excela 2007 to 1 048 576)

Cells(Rows.count, "A") zwraca komórkę A1048576 czyli ostatnią z kolumny
  • Odpowiedz
@Golob:

Rows.count zwraca ostatni wiersz arkusza (dla Excela 2007 to 1 048 576)


gwoli jasnosci - rows.count zwraca ostatni wiersz akrusza w tym konkretnym przypadku, ogolnie to zwraca numer wiersza ;)
  • Odpowiedz
#vba #excel

Mirki pomożecie, czy w poniższym kodzie jest jakiś błąd? zależy mi żeby zrobić top5

With ActiveSheet.Select

AutoFilterMode
  • 3
  • Odpowiedz
  • Otrzymuj powiadomienia
    o nowych komentarzach