Wszystko
Najnowsze
Archiwum
@fortheworld: zrób convert pdf to excel a pozniej mozesz wszystko :-)
- 1
@Luxik: DZIĘKI!
konto usunięte via iOS
- 1
Uzywacie klas i ogolnie programownia obiektowego w #vba ? Czy tylko proceduralnie makra? #programowanie
- 0
@SilvioDante: na tyle na ile się da, to tak
Treść przeznaczona dla osób powyżej 18 roku życia...
- 1
naprawiłby mi ktoś makro za jakiś czteropak :D?
w skrócie miałem makro do wysyłania potwierdzeń mailem, po przesiadce na windowsa 8 wyrzuca błąd - wydaje mi się, że mogły się zmienić niektóre komendy
#vba #excel #pytanie #pytaniedoeksperta
w skrócie miałem makro do wysyłania potwierdzeń mailem, po przesiadce na windowsa 8 wyrzuca błąd - wydaje mi się, że mogły się zmienić niektóre komendy
#vba #excel #pytanie #pytaniedoeksperta
Witam, Mirki!
Czy w Excelu jest możliwość modelowania za pomocą makra wielkości kształtu (na przykład koła 1 cm x 1 cm) poprzez pobieranie wartości z komórki? Na przykład w komórce A1 jest wartość 1.1, co oznacza 110% początkowego kształtu przy zablokowanym współczynniku proporcji. Po uruchomieniu makra dany kształt powiększa się o wartość komórki A1. Jeżeli tak, w jaki sposób to zrobić, bo nie mam pomysłu? Z góry dzięki!
#excel #
Czy w Excelu jest możliwość modelowania za pomocą makra wielkości kształtu (na przykład koła 1 cm x 1 cm) poprzez pobieranie wartości z komórki? Na przykład w komórce A1 jest wartość 1.1, co oznacza 110% początkowego kształtu przy zablokowanym współczynniku proporcji. Po uruchomieniu makra dany kształt powiększa się o wartość komórki A1. Jeżeli tak, w jaki sposób to zrobić, bo nie mam pomysłu? Z góry dzięki!
#excel #
@kot_spryciula:
ActiveSheet.Shapes.AddShape(msoShapeOval, 231, 51, 90.75, 66).Select
ActiveCell.Offset(1, 2).Range("A1").Select
ActiveSheet.Shapes.Range(Array("Oval 1")).Select
Selection.ShapeRange.LockAspectRatio = msoTrue
Selection.ShapeRange.ScaleHeight 1.61,
ActiveSheet.Shapes.AddShape(msoShapeOval, 231, 51, 90.75, 66).Select
ActiveCell.Offset(1, 2).Range("A1").Select
ActiveSheet.Shapes.Range(Array("Oval 1")).Select
Selection.ShapeRange.LockAspectRatio = msoTrue
Selection.ShapeRange.ScaleHeight 1.61,
- 1
@entaroadun: Szkoda, że od początku nie wpadłem na najprostsze rejestrowanie makra. Dzięki!
- 1
Mirki mam problem ( ͡° ʖ̯ ͡°) Przygotowałem sobie pokaźny arkusz wraz z makrami. Wszystko bangla, ale gdy operuję na datach miesiące i dni zczytuje okej, ale roku już nie. Jeżeli sprawdzam z rokiem bieżącym to warunek nie jest wykonywany. Każdy inny rok poza wpisanym w komórkę działa. Datę pobieram z jednej z komórek w excelu, ponieważ VBA nie chciało mi przyjąć Year(Today()). Kod wklejam poniżej (a raczej jego wycinek). Jakieś
@Elav: wedlug mnie to problem z formatami w komorce, u mnie zapiska z year smiga.
Sproboj dodac:
=TEXT(S9,"yyyy")
Sproboj dodac:
=TEXT(S9,"yyyy")
@Elav: podstawowy problem w tym, że używasz tam
If Year(Range("S9")) = 2016 Then
To też nie jest rozwiązania idealne, bo jeśli kod będzie umieszczony w module, to może dawać różne rezultaty w zależności
Year(S9) więc nie ma prawa działać. W VBA nie możesz sobie używać tak po prostu formuł takich jak w komórkach Excela, w tym wypadku S9 jest po prostu nazwą niezadeklarowanej zmiennej o wartości Empty. Rozwiązań problemu jest sporo, np:If Year(Range("S9")) = 2016 Then
To też nie jest rozwiązania idealne, bo jeśli kod będzie umieszczony w module, to może dawać różne rezultaty w zależności
- 1
#excel #vba #
Może mi ktoś pomóc? Potrzebuję zrobic makro pod skaner kodów kreskowych. Makro kończy się po otwarciu okna wyszukaj. Chciałbym żeby działało dalej i wykonywało jeszcze jedną czynność. Mianowicie po wciśnięciu przycisku enter zamykało mi okno wyszukaj. #kiciochpyta
Może mi ktoś pomóc? Potrzebuję zrobic makro pod skaner kodów kreskowych. Makro kończy się po otwarciu okna wyszukaj. Chciałbym żeby działało dalej i wykonywało jeszcze jedną czynność. Mianowicie po wciśnięciu przycisku enter zamykało mi okno wyszukaj. #kiciochpyta
- 0
@Luxik: Application.Dialogs(xlDialogFormulaFind).Show
Chodzi mi o to, żeby wciśnięcie przycisku enter zamykało okno otwierane skrótem ctrl+f
Chodzi mi o to, żeby wciśnięcie przycisku enter zamykało okno otwierane skrótem ctrl+f
konto usunięte via iOS
- 0
@Ojezuniu: poszukaj: jak w kodzie wywołać inny kod po wciśnięciu klawisza i niech wywoła to samo ale z .Close
- 2
Jestem w trakcie robienia makra pobierajacego dane z kilkunastu plików do jednego i chciałem przyśpieszyć je stosując pętle lecz niewiem jak to rozgryźć.
http://pastebin.com/fhAW0K38
W plikach będącym źródłem są dane w co drugiej kolumnie piętnastego wiersza i tak 10 razy aż do dwudziestej kolumny, potrzebuje to przekopiować do pliku głównego do trzeciego wiersza kolejno od drugiej kolumny do jedenastej .
#programowanie #vba #excel
http://pastebin.com/fhAW0K38
W plikach będącym źródłem są dane w co drugiej kolumnie piętnastego wiersza i tak 10 razy aż do dwudziestej kolumny, potrzebuje to przekopiować do pliku głównego do trzeciego wiersza kolejno od drugiej kolumny do jedenastej .
#programowanie #vba #excel
Co polecacie jako źródło wiedzy odnośnie nauki makr i vba ?? Dostałem propozycje praktykanta na dobrych warunkach ale muszę się zacząć tego ostro uczyć.
#it #programowanie #vba #excel
#it #programowanie #vba #excel
- 6
@Kejran: Walkenbach
@Kejran: najlepiej poczytać jakieś kompletne podstawy, typu deklaracja zmiennych, pętle, warunki, tablice. Następnie zacząć wymyślać sobie zadania i je robić. Na początku przyda się rejestrator makr, żeby poznać trochę strukturę klas. Następny krok to ulepszanie tego co powstaje za pomocą rejestratora, bo kod generowany w ten sposób zazwyczaj do niczego się nie nadaje:). Poza tym jak gdzieś utkniesz, to zazwyczaj znajdziesz gdzieś gotowe rozwiązanie.
konto usunięte via Android
- 1
Mirki potrzebuję pomocy.
Mam zakres, powiedzmy ("A1:B30"), częściowo wypełniony liczbami
Chciałbym, żeby:
w kolumnie C, od góry arkusz wstawiał datę modyfikacji którejkolwiek z komórek w zakresie
Mam zakres, powiedzmy ("A1:B30"), częściowo wypełniony liczbami
Chciałbym, żeby:
w kolumnie C, od góry arkusz wstawiał datę modyfikacji którejkolwiek z komórek w zakresie
To wklej jaki masz kod z timestamp, dodanie D - raczej nie będzie kłopotu, E - to zależy - jeśli skoroszyt nie będzie chroniony, to trudno będzie poznać, czy zmieniona komórka jest pusta, bo została skasowana, czy została wstawiona komórka. Bez przechowywania poprzednich wartości nie będziesz też w stanie rozpoznać, czy ktoś edytował komórkę, czy tylko wszedł w edycję i nacisnął Enter
@berti:
@berti:
@berti: Ja proponuję Ci zrobić dwa arkusze takie same, zdublowane i pozniej w kolumnie E funkcja jezeli pokazać z arkusza 2 co było.
- 1
- 1
Mirki,
Mam problem z makro w excelu które wklei mi w zaznaczony zakres aktualną datę. Póki co udało mi się napisać takie coś:
Sub data()
a = Date
Selection.NumberFormat = "m/d/yyyy"
Mam problem z makro w excelu które wklei mi w zaznaczony zakres aktualną datę. Póki co udało mi się napisać takie coś:
Sub data()
a = Date
Selection.NumberFormat = "m/d/yyyy"
- 1
Mirki, halp!
Coś takiego mi wyskakuje, gdy chcę wstawić cokolwiek do user forma. Na uczelnianych komputerach ładnie śmigało, więc nie mam pojęcia o co chodzi. Ogarnia ktoś?
#pytaniedoeksperta #excel #vba
Coś takiego mi wyskakuje, gdy chcę wstawić cokolwiek do user forma. Na uczelnianych komputerach ładnie śmigało, więc nie mam pojęcia o co chodzi. Ogarnia ktoś?
#pytaniedoeksperta #excel #vba
źródło: comment_JQodjDU6QFYA0WN5lwi6ZLGjtn9HKznO.jpg
Pobierz- 1
@maVka: na przyszłość, jedyne co zrobiłem to wpisałem w Google "800a0011" i wbiłem w pierwszy z brzegu odnośnik :D
Na razie używanie vba za bardzo mnie przeraża i paraliżuje zdolności myślenia xD
@maVka: to zacznij od czegos latwiejszego. Tu masz fajny kurs według mnie.
http://www.excel-pratique.com/en/course/excel_basics.php
Poza tym stworz sobie PERSONAL.xls aby moc zapisywać stworzone kody. Aby to zrobić musisz nagrać jakieś Macro. Obojętnie co.
- 1
Jak zrobić aby, poniższe makro ładowało mi się przy udzielaniu odpowiedzi w mailu w outlook'u?
Sub CreateHTMLMail()
Dim objMail As Outlook.MailItem
Set objMail = Application.CreateItem(olMailItem)
With objMail- 0
@Luxik dzięki, przejrzę
Czy w #openoffice można działać w #vba, czy on po prostu tego nie ma? W najmniejszym przypadku nie zauważyłem czegoś takiego jak "deweloper", czy "edytor vb". #informatyka
- 1
Murki, #kiciochpyta w sprawie #access i #programowanie #vba. Mam pole listy "Pracownicy" z multiwyborem (nazwiska). Poniżej znajduje się pole tekstowe podpięte źródłem formantu pod multilistę "Pracownicy" (pokazuje aktualne zaznaczenia w jednym wierszu). Jaki zrobić myk, aby w tym polu tekstowym zamiast numerów indeksu pracowników pojawiły się nazwiska?
źródło: comment_PqIibnHbPEVn8MijQksj7mvo81RTlgFe.jpg
Pobierz- 0
@Pachlak: jak wejdziesz w edycje formularza i właściwości tej listy to jest tam pole BoundColumn albo cos takiego. I tam powinieneś zamaist 1 wstawić np. 2 jeśli jest to podlinkowane do dwukolumnowej tabeli (index, jakas wartosc)
- 0
@dziaru: w polu tekstowym (tym na samym dole screena) nie ma we właściwościach pola BoundColumn.
- 1
Heh, są tu jacyś magicy od #excel a konkretnie od #vba ?
chciałem zacząć się tego uczyć, robię sobie książkę Walkenbacha "Programowanie w VBA dla bystrzaków", ale czy ktoś ma może jakieś ciekawe linki o tej tematyce?
To co znalazłem w necie to jakies stare kursy do Excela 2000/2003 a do '13 nie ma.
Ktoś? Coś? :)
#kiciochpyta w sumie to może nawet %programowanie ale jednak
chciałem zacząć się tego uczyć, robię sobie książkę Walkenbacha "Programowanie w VBA dla bystrzaków", ale czy ktoś ma może jakieś ciekawe linki o tej tematyce?
To co znalazłem w necie to jakies stare kursy do Excela 2000/2003 a do '13 nie ma.
Ktoś? Coś? :)
#kiciochpyta w sumie to może nawet %programowanie ale jednak
- 1
Mirki obcykane w #access i #vba - jakim sposobem można wyciągnąć wybrane wartości w multiselect listbox, np. żeby były wypisane w polu tekstowym, oddzielone przecinkiem? Kwerenda, vba?
#kiciochpyta #programowanie
#kiciochpyta #programowanie
















Ma on mnożyć i dodawać wartości różnych komórek do komórki E11 zależnie od jej wartości.
Private Sub CommandButton1_Click()Dim KOSZT As Integer
KOSZT = Range("C11").Value