Tím "seskupit listy" je možná myšleno kliknutí myší na ouško listu, pak při současném držení Shift kliknutí na ouško jiného listu - vyberou se všechny listy mezi těmito dvěma poklikanými (ev. s klávesou Ctrl lze vybrat nesouvislou řadu listů). Do takové skupiny listů pak lze hromadně např....

jde to i pomocí maticových vzorců, viz příklad v příloze

třeba takto

Kam skočí kurzor, když po sobě zmáčkneš klávesy {End} a {Home} ? Excel si urputně pamatuje poslední buňku na listu, kde původně byla nějaká data nebo formáty. I když vymažeš řádky/sloupce, nepomůže to. U mě zabírá následující finta - v editoru Visual Basic je podokno Immediate, do něj napiš příkaz p...

Tak ještě zkus ten pst soubor Otevřít nebo Importovat na jiném počítači s Outlookem.
Velikost (339 zpráv) by neměl být problém, to se vejde např. na flashku. Pokud by to jelo na jiném počítači, pak problém nebude v pst souboru samotném, ale někde v nastavení Outlooku.

JarZa

Tak ještě zkus nedávat import, ale otevřít ten napravený pst soubor v Outlooku přes menu Soubor/Otevřít/Datový soubor aplikace Outlook
Jinak bohužel neumím poradit, ale pokud máš někde kolem sebe nějakého IŤáka, tak by s tím už mohl pomoct.

JarZa

a určitě si ten pst soubor napřed zazálohuj, ten postup přes HEX editor a scanpst.exe může být destruktivní, tak pokud by to nevyšlo, ať máš základ pro další pokusy ...

Ahoj, kdysi v roce 2005 jsem podobnou věc řešil, už si to samozřejmě nepamatuju, ale můžeš to zkusit. Na http://www.outlook-tips.net/howto/recover_deleted.htm" onclick="window.open(this.href);return false; je návod, jak v pst souboru "znásilnit" hlavičku souboru pomocí nějakého HEX Editoru...

Jo, chybí tam tečka mezi Target a Row

If Cells(i, 2) = Cells(TargetRow, 3) Then GoTo

má být

If Cells(i, 2) = Cells(Target.Row, 3) Then GoTo

Ahoj, problém bude v tom, že Target a jeho vlastnosti (.Row, .Column, ...) jsou dostupné (živé) pouze v rámci události Worksheet_Change(). Takže v uvedeném případě by se Sub Makro() buď muselo napsat s uvedením parametrů a s těmito parametry pak volat z Worksheet_Change, anebo (jednodušší) kód Makro...

Podle mě to máš napsáno správně - Target.Row / Target.Column by měl bez problémů fungovat (ověřeno v Office 2003).
JarZa

Ahoj,
použij hodnotu Target.Value nebo Target.Formula - ve VBA dvojklikem na příslušném listu - vybrat událost Worksheet_Change - viz kód níže a obrázek.

JarZa