Nalezeno 10 výsledků hledání

od LovelyTank2
25 čer 2012 19:36
Fórum: Kancelářské balíky
Téma: Rozdílnost ovládacích prvků
Odpovědi: 0
Zobrazení: 200
Pohlaví: Muž

Rozdílnost ovládacích prvků

Zdravím, po delší době jsem opět začal něco tvořit ve VBA a čím víc toho vím, tím víc se mi zdá, že mi chybí úplné základy... Teď momentálně řeším v čem jsou rozdílné ovládací prvky. Mám na mysli: Ovládací prvky formuláře a Ovládací prvky ActiveX. Popřípadě ještě proč nevyužít UserForm přímo ve VBA?...
od LovelyTank2
12 dub 2012 14:11
Fórum: Kancelářské balíky
Téma: Kopirovani do sheetu pomoci VBA Vyřešeno
Odpovědi: 4
Zobrazení: 452
Pohlaví: Muž

Re: Kopirovani do sheetu pomoci VBA Vyřešeno

Cau,

diky moc za help!
Jen bych doplnil, ze

Kód: Vybrat vše

For Each wsh2 in ThisWorkbook

mi nefungovalo (dostaval jsem stejnou chybu)

Tak jsem to nahradil

Kód: Vybrat vše

For Each wsh2 In Sheets


Kazdopadne jeste jednou diky!
David
od LovelyTank2
12 dub 2012 10:38
Fórum: Kancelářské balíky
Téma: Kopirovani do sheetu pomoci VBA Vyřešeno
Odpovědi: 4
Zobrazení: 452
Pohlaví: Muž

Re: Kopirovani do sheetu pomoci VBA Vyřešeno

Diky moc za tipy. Nicmene - pouzil jsem: dim wsh1 as Worksheet dim wsh2 as Worksheet set wsh1 = ThisWorkbook.Worksheets("budgetary") If wsh1.Cells(i, 11).Value = wsh2.Name Then 'neco udelej End If a dostavam chybu: Object Variable or With block variable not set Z toho usuzuju, ze se musi n...
od LovelyTank2
11 dub 2012 16:45
Fórum: Kancelářské balíky
Téma: Kopirovani do sheetu pomoci VBA Vyřešeno
Odpovědi: 4
Zobrazení: 452
Pohlaví: Muž

Kopirovani do sheetu pomoci VBA Vyřešeno

Caute, takze dalsi zasek. Udelal jsem si proceduru kde se mi podle jednoho sloupce se jmeny vytvari sheety: Sub WORKSHEET_ADD() lastrow = Worksheets("customers").Range("A1").End(xlDown).Row For i = 1 To lastrow Worksheets.Add().Name = Sheets("customers").Cells(i, 1).Val...
od LovelyTank2
11 dub 2012 13:07
Fórum: Kancelářské balíky
Téma: Kopírovaní více buněk pomocí VBA Vyřešeno
Odpovědi: 5
Zobrazení: 762
Pohlaví: Muž

Re: Kopírovaní více buněk pomocí VBA Vyřešeno

Jezis ja sem idiot....

Kazdopadne dekuji moc za help!
(Bohuzel mam dalsi issue tak budu tvorit dalsi topic :( )
od LovelyTank2
11 dub 2012 10:45
Fórum: Kancelářské balíky
Téma: Kopírovaní více buněk pomocí VBA Vyřešeno
Odpovědi: 5
Zobrazení: 762
Pohlaví: Muž

Re: Kopírovaní více buněk pomocí VBA Vyřešeno

Diky za radu ale jde to udelat pomoci prikazu Cells? Muj kod vypada lastrow = Worksheets("Working_sheet").Range("D2").End(xlDown).Row For i = 1 To lastrow Sheets("Working_sheet").Select If Cells(i, 2).Value = "remove" Then ' A tady potrebuju prave Cells (i,3) ...
od LovelyTank2
10 dub 2012 21:33
Fórum: Kancelářské balíky
Téma: Kopírovaní více buněk pomocí VBA Vyřešeno
Odpovědi: 5
Zobrazení: 762
Pohlaví: Muž

Kopírovaní více buněk pomocí VBA Vyřešeno

Zdravím všechny nadšence! Takže po delší odmlce jsem se opět rozhodl něco vytvorit ve VBA a nečekaně jsem narazil na jeden problém, který je ale podle mě tak trivialní, že mám strach aby jste mě neukamenovali... A veřte mi - googlil jsem ostošest bohužel jsem nenašel vhodná slova... K problému: Jaká...
od LovelyTank2
08 pro 2011 21:18
Fórum: Kancelářské balíky
Téma: MsgBox - více výsledků Vyřešeno
Odpovědi: 4
Zobrazení: 373
Pohlaví: Muž

Re: MsgBox - více výsledků Vyřešeno

Diky za všechno!!! Myslím, že další dotazy na sebe nenechají dlouho čekat :)
od LovelyTank2
08 pro 2011 20:59
Fórum: Kancelářské balíky
Téma: MsgBox - více výsledků Vyřešeno
Odpovědi: 4
Zobrazení: 373
Pohlaví: Muž

Re: MsgBox - více výsledků Vyřešeno

Díky moc. To je přesně co jsem potřeboval.
Jen posledni věc (není až tak důležitá). Je tu možnost jak vykopírovat výsledný text z msgboxu? Ctrl+C funguje ale jsem perfekcionista :)
od LovelyTank2
08 pro 2011 19:19
Fórum: Kancelářské balíky
Téma: MsgBox - více výsledků Vyřešeno
Odpovědi: 4
Zobrazení: 373
Pohlaví: Muž

MsgBox - více výsledků Vyřešeno

Zdravím všechny nadšence VBA, předem chci upozornit, že jsem nováčkem ve VBA a ne vše je mi jasné.. :) Nyní k problému. Ve spreadsheetu mám několik sloupců. Pomocí funkce for...next se pokusím vyhledat potřebné hodnoty (stále fungujem :) a pak potřebuji tyto hodnoty vypsat do msgboxu. A tady je káme...

Přejít na rozšířené vyhledávání