MS Excel

Zdravim,

prosim o radu jestli někdo neví jak napsat makro aby se mi automaticky kopírovaly obsahy buňek které splňují nějakou podmínku do komentářů. Na netu jsem našel makro které kopíruje vzorce ale moc mi to nepomohlo .. nemáte někdo prosím někdo nějakou radu? Předem díky

podmínka (např): =SUMA(KDYŽ(StCHa1!I7:I4000=9;KDYŽ(StCHa1!O7:O4000=64;1;0))) (samozřejmě na něco jinýho musela by se k tomuto účelu nějak upravit)

Zaslat odpověď >

Poki(27.1.2011 12:44)#003915

chapu, otazka je, pro jake bunky toto uplatnit a jake jsou ty podminky.
Pro nazornost, nasledujici kod umisti hodnotu aktivni bunky do jejiho komentare v pripade, ze se aktivni bunka rovna 1 If ActiveCell.Value = 1 Then
ActiveCell.AddComment (CStr(ActiveCell.Value))
End Ifcitovat

wh1(28.1.2011 7:13)#003919

Zdravim,

pro lepší pochopení přikládám soubour o který se jedná a věc je následující:

do listu 2 (M7-X4000) nakopíruji seznam
buňky A7-L4000 obsahují podmínky přes které si poté můžu vyfiltrovat potřebné údaje
pro příklad filtrován sloupec J (PV2>AV)

v listu 1 je tabulka (A1-N19) kde se provádí součty informací které splňují podmíky

moje otázka je jestli je nějaká možnost udělat makro které by do listu 1 např. do buňky K15
udělalo komentář z listu 2 buňka M10 (zde se jedná jen o jednu buňku a jeden komentář ale jiný případ by mohl být víc komentářů do jedné buňky)

Příloha: zip

3919_status-changes.zip (430kB, staženo 11x)

citovat

Poki(28.1.2011 11:34)#003920

Udelat jde temer vsechno, jen je otazka, jak to "neco" nadefinovat.
Mozna jsem natvrdlej, ale porad to nechapu.

Bylo by mozne jasne rici, co potrebujete?
Napr. Do bunky K15 na listu 1 potrebuji vlozit komentar, ktery by obsahoval hodnotu bunky M10 z Listu 2 pouze v pripade, ze bunka M10 na listu 2 nebude prazda.

Nebo neco v tomto duchu - mozna je to tema pivkama, co jsem si vcera dal, ale proste nechapu...

citovat

wh1(28.1.2011 12:09)#003921

Pohodička

možná jsem to napsal špatně ....

prostě vytvořit makro který by udělalo komentář k příslušnej buňce v listu1 tzn.:

zkopíruju si seznam do listu2 jak se už psal kde má každej sloupec zadaný vzorce který filtrujou nějaký údaje takže si vyfiltruju informace jak už jsem psal ve sloupci PV2>AV ty se mi automaticky propíšou do tabulky v 1istu1 ale právě bych tam potřeboval aby se automiticky k těmto buňkám přidělili komentáře z buněk v listu2 (obsahy - XVK79******) tzn že by to makro muselo brát v potaz zadané podnínky a dokázalo podle nich přidelit komentář do příslušné buňky v listu 1 ...a vypadalo by to následovně : v listu1 je tabulka kde u "varianty" XVK79 je 1 událost která splňuje podnínky a v komentáři by bylo přesné číslo této varianty XVK79****** která splnila tyto podnínky ....kua to je hrozná věta ...

citovat

Poki(28.1.2011 14:50)#003922

takhle by to snad mohlo jit...

Příloha: zip

3922_status-changes.zip (521kB, staženo 25x)

citovat

wh1(28.1.2011 15:48)#003925

co na to říct ... úklon až k zemi ...jestli seš z Plzňe máš u mě moc piv ...díky!!!citovat

Poki(28.1.2011 19:19)#003927

tak jsem to teda nakonec asi pochopil.
Bohuzel z Plzne nejsem, tak si budu muset dat specialitku z my rodny hroudy - vino :).
Viva Znojmo!!!

citovat

wh1(31.1.2011 9:07)#003935

Čus,

tak ještě jednou otravuju .. dnes jsem to v práci odzkoušel a jak jsem psal funguje to přesně jak jsem potřeboval ale pouze na omezenou oblast …proto jsem chtěl poprosit jestli by to nešlo rozšířit na všechny buňky … nasimuloval jsem jak by to mohlo vypadat (každý den se seznam mění).
Pozn. Upravil jsem podmínky ve vzorcích (Ano-1 / Ne-X pro všechny podmínky) před tím to bylo stupňovaný po sloupcích (Ano-1 / Ne-X ; Ano-2 / Ne-X atd.)

A poslední prosba nedoporučil bys mi nějakou literaturu na VBA for apl. Chtěl bych se to taky naučit a už víc neotravovat :o)

Příloha: zip

3935_status-changes1.zip (481kB, staženo 18x)

citovat

Téma: VBA komentare

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje