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

Příspěvky uživatele

Jiří 497
Jestli to je otázka k obsáhlosti sešitu tak:
Klíčů může být cca max 50
Položek ve zdroji celkově i několik 1000.
Jestli to je otázka k nakopnutí tak tomu rozumím ale namě je to mooc komplikované

mepexg
kontingenční tabulky prosím nee

Zdravím
Chtel bych poprosit jestli nekdo poradi s danym makrem:
Ke každému unikatnímu klíči ve slpupci se má vytvořit nový list se jmenem klice. Na novy list se má vykopirovat jen data daneho klice z definovanych sloupcu. Nejak netusim jak nato...
Viz příloha

elninoslov
Test2 a Test3 funguje skvěle, DÍKY za nápad. Uložím do sbírky
DÍKY MOC

Ahoooj Stalker
Funguje to perfektněěě a to se hodí
děkujuu mooc

StrejdaPompo
ajooo sem slepej DÍKY Mooc
ColumnLetter = Split(Cells(1, Sloupec).Address, "$")(1)

Zdravím
mám ještě jednu otázku jestli někdo neporadí jak z jednoho sešitu zjistit poslední zaplněný řádek ve sloupci B v šešitu druhém který je zavřený a je úplně na jiné adrese v PC.
Myslel jsem nějak takto ale nedaří se mi tam vložit tu adresu k sešitu.

Na této adrese je druhý soubor ze kterého potřebuji dostat číslo posledního zaplněného řádku ve sloupci B.
MaxRadek = C:\Users\mer\OneDrive\Plocha\Data\....

((Bez cesty je to snadné..
MaxRadek = List1.Cells(Rows.Count, 2).End(xlUp).Row ))
Děkuji za radu

Zdravím chci se zeptat jestli je možné ve VBA pokud mám číslo sloupce npř: 3 abych toto číslo převedl na písmeno sloupce = C.
Nic jsem nevygooglil..

elninoslov Děkuji moc, zajímavý odkaz prostuduji

elninoslov
vzpoměl jsem si na tvů nápad Application.ExecuteExcel4Macro kde si dostal hodnotu ze zavreného souboru. Chci se zeptat bylo by možné vyhledávat (SVYHLEDAT)danou hodnotu v jednom sešitu a hledat danou hodnotu všešitu druhém bez otevření:
Př: Sešit1 sloupecA hodnoty A,B,C,D sešit budu mít otevřený. V zavřeném Sešitu2 ve sloupci A budu mít také A,B,C, a ve sloupci B nějaká čísla. Je možné do sešitu1 Přiřadit hodnoty ze sešitu2 bez otevření?
Děkuji za nápad

*Něco jsem dohledal, vypíše to sice jen velikost každého listu ale pro začátek dobrý:

http://myengineeringworld.net/2014/07/get-sheets-size-excel-add-in.html

AL: okok, díky za nasměrování,
marjankaj: nikdy nevíš, ale hodila by se mi do sbírky

lubo, AL,
Děkuji moc za vysvětlení a za názory jak vůbec problém uchopit. Je opravdu vidět že "taková blbost by byla spíš náročná na tvorbu a údržbu než na službu co by přinesla. Nicméně metoda jak píše AL postupného přidávání funkcionalit zní dobře (možná již existuje). Pokusím se po ní porozhlídnout a případně jí sem vložím.

Zdravím všechny,
chtěl jsem se zeptat jestli by bylo vůbec možné vytvořit makro které bych mohl univerzálně vložit do jakéhokoli sešitu a po spuštění by vypsalo následující analýzu toho co v sešitu zabírá dané místo:
Celková Velikost Sešitu v MB
Podmíněný formát MB
Formát MB
Funkce MB
Maticové funkce MB
Čisté hodnoty MB
atd..
*Netuším podle čeho a jestli vůbec by se to dalo nějak takto rozeznat. Jen mě napadlo že by člověk ihned věděl že pokud má třeba soubor 50 MB a z toho jsou čisté hodnoty jen 5 MB tak asi něco není ok a případně by se ukázalo i co.
Díky za názor a případné nápady

elninoslov
máte pravdu funguje to také, já tam totiž nedával ve Workbooks("TEST5.xlsm") tu příponu .xlsm ( )

DÍKY MOC

elninoslov
apostrofy NOJOOO už to fungujeeeee DÍKY MOC

Řešení:
Toto jsem zkoušel hned na začátku ještě než jsem psal tento příspěvek a to nefunguje.
Workbooks("TEST5.xlsm").Worksheets("List1").Range("D5").Value
a
ThisWorkbook.Worksheets("List1").Range("D5").Value

Netuším proč ale až když jsem náhodou narazil na EVALUATE tak to začalo běhat ale netuším proč.
Děkuji moc za pomoooc

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

Formulář Faktura

Helios iNuvio

On-line nástroje