• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

Příspěvky uživatele

tu som to opravil:

ked zadavate podmienene formatovanie je idealne zaznacit vsetky bunky v sheete aby ste videli vsetko co ste tam nastavili

... lahsie sa potom s tym robi

dost divna otazka

ale odpoved znie ANO.

kludne aj 200 alebo kludne jedno makro co v nom je tych 200 makier alebo makro kde je zoznam tych 200 makier alebo cyklus co postupne ako zoznam ich pusta tie makra ..... no hold v programovani ide vsetko mozne urobit :)

aha uz chapem v com je problem vy mate celkovu tabulku rozdelenu podla mesiacov na dalsie sheety

radim dajte ju do jednej tabulky a vzorce prerabajte na mesiace ... potom uz ziadny problem nevznikne

v office 2013 ide dat na tabulku este aj Slicer ... ale to je len pre fajnsmekrov :))

mohli by ste dodat prilohu

... lebo stale nerozumiem v com je problem

urobite si formular k nemu pridam tabulku. Tabulku sfiltrujem s jednym klikom a tlacim

tuto operaciu musite vykonat 250x??? samozrejme pre kazdeho ineho dodavatela?

tu nevidim ziadny problem:

moze sa vytvorit filter k tabulke a v nej to filtrovat

alebo sa spravi pivot table a tam si nastavim sledovane udaje s filtrom

akoze netusim preco to tak je ale musi to byt presne nadefinovane ako je napr. keby ste napisali:
test = Range("A1:A5").Value

takze staci to napisat takto:
Sub PokusPole()
Dim pole() As Variant
Dim KonecPole As Integer

KonecPole = Range("A1").CurrentRegion.Rows.Count
ReDim pole(1 To 5, 1 To 1)
For i = 1 To KonecPole
pole(i, 1) = Cells(i, 1)
Next i
Range(Cells(1, 2), Cells(5, 2)) = pole
End Sub

a pojde to

dolpnok: Ale mozno ze uz tusim preco to tak je :) ale to je len dohad .... sheet je tvoreny z riadkou a stlpcou .... a podla vasho pola mal len jeden udaj nemal druhu suradnicu .... tj. jedine to pojde vlozit tak ked pole ma suradnice X a Y

nestretol som sa s touto chybou ale tu je viac rieseni skuste nejake z nich pouzit:
http://excelmatters.com/2014/12/10/office-update-breaks-activex-controls/

urcite nieje :) .... pretoze som tieto objecty zacal ignorovat ... ale kedze ste nasli riesenie tak ich budu pouzivat

v robote nemozem pustit youtube ale doma si to urcite pozriem

dik za odpoved :)

podobne som riesil ja

tu je navod:
http://wall.cz/index.php?m=topic&id=22945

este by som chcel upresnit nestaci len zaregistovanie kniznicu ale treba este pustit aj inf

tu je presne navod:
http://blogs.msdn.com/b/vsod/archive/2009/06/05/visual-basic-6-controls-stop-working-after-security-advisory-960715.aspx

dik Poky tiez som dosiel k tomuto zaveru a uz to aj riesim s nasimi adminmi aby tym ludom doregistrovali danu kniznicu :)

Lebo podla obrazkov co ste poslali ste mali v tabulke len jeden riadok a ked pouzijete prikaz End(xlDown) tak sa dostanete uplne dole tj. na 1048576 riadok k tomu +1 ste sa dostali mimo excel preto to hadze chybu

pouzite tuto funkciu:
With Range("H17").CurrentRegion
.Cells(.Cells.Count + 1).Select
End With

aj ked ja by som to napisal trosku jednoduchsie a to takto:
Range("H17").End(xlDown).Offset(1, -6).Select

skusal som to u seba a umna to ide bez problemov ... poslite prilohu alebo napiste o aku chybu ide?

stale nikoho nic nenapadlo? :)

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

Formulář Faktura

Helios iNuvio

On-line nástroje