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

Příspěvky uživatele

prepojit tvary na obrazku ?
srandujes ....

ano , aj ja som to skusal na jednoduchom priklade a tam mi to funguje. Problem je ze to makro to vymaze bez toho aby sa spustila udalostna procedura. Viete mi niekto poradit inu moznost ako zistim v ktorom kroku mi makro vymaze tu hodnotu z A1? ako som pisal krokovanie napripada do uvahy.
dik

teoreticky by som sem mohol dat aj cele 4 subory s ktorymi to makro pracuje, ide mi vsak hlavne o to ze na zaciatku je bunka A1 prazdna. Spustim makro a to mi v urcitom bode zmeni hodnotu bunky A1 (pritom sa ktivuje makro Worksheet_Change , a v nom sa to zastavi na tom riadku kdesom dal stopku, a spusti sa editor makier, ktory zobrazi kde je to stopnute - to je OK).
Cize v tomto bode je uz zmenena hodnota bunky A1 (to vidim, je to OK). Nasledne stlacim v editore zelenu sipku aby makro pokracovalo dalej, makro sa spusti a ked skonci tak bunka A1 je prazdna, avsak procedura Worksheet_Change sa uz nespusti aj napriek tomu ze bunka A1 zmenila svoju hodnotu. Stale mam stopku na riadku x=3 v procedure Worksheet_change takze by sa to pri spusteni procedury zastavilo.

ahojte, na liste mam
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 1 And Target.Column = 1 Then
x = 3
End If
End Sub
pricom na riadku x=3 davam v editori STOPku.
Makrom vyplnujem bunku A1. Pri vyplnovani (vkladam do bunky obsah premennej Cells(1,1).value = cena, cena je premenna v ktorej mam vlozene cislo), sa mi to cele pekne zastavi na udalosti zmeny listu, riadok x=3. Nasledne (dalsim spustenim makra zelenou sipkou v editore) mi vsak makro vymaze tuto hodnotu (ostane prazdna bunka) ale k zastaveniu na x=3 uz nedojde. Existuje nejaka moznost ako makro zmeni hodnotu A1 bez toho aby sa spustila procedura Change na tomto liste?
Problem je totiz to ze vymazanie tejto hodnoty je neziaduce a ja neviem ako zistit kedy sa to stane (makro je dost dlhe a stane sa to v cykle kde cca 300x prechadzam 4000 riadkov (krokovanie by mi trvalo asi tyzden ak nie viac). Vopred dakujem za reakcie

aka otazka , taka odpoved (aj ked odpoved je aspon funkcna)
co keby si napisal presne co chces a co v excely vies spravit, a co vlastne chces tym makrom dosiahnut.
jaky workbook, jaky module ?

Sub kkk()
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub

sice si popisal co to nerobi ale nevieme co to ma robit.
1. co to ma robit
2. data v kosi sa budu menit ako ?

skus do bunky zapisat
=5-4,9-0,1
dobre ne ? (aj ked to konkretne s tymto pripadom asi velmi nesuvisi)

cize ak dobre rozumiem , ak mas napriklad bunku v piatom riadku prazdnu tak sa ma ako nazov pre piaty list pouzit obsah az z nasledujucej plnej bunky (napr z riadku 6),
alebo sa v tom pripade iba nema premenovat list c 5 (mimochodom takto to momentalne funguje)?

neviem ci som to spravne pochopil, pozri, napis ci ok

no aby som to presnejsie opisal. makrom si vytvaram novy subor , nasledne otvaram tie s chybami a z nich kopirujem vsetky vyplnene riadky do toho noveho suboru (v tych riadkoch teda prenasam aj tie chyby - teraz ma napadlo ze to skusim kopirovat len ako hodnoty), ten novy subor potom ukladam, a vtedy sa to zruti. no nic idem skusit kopirovat iba hodnoty.

konecne som sa k tomu dostal.
Paloo - Tvoje riesenie mi nefunguje (nadalej vyhadzuje privela formatov)

Al - Tvoje riesenie otvara subor bez problemov, avsak zomrie mi to pri naslednom ukladani tohto suboru.

nevviete mi niekto poradit aj s ulozenim tohto suboru?

vopred dik

tak to som prvykrat neprecital poriadne zadanie, s tymto Ti bohuzial nepomozem

textbox1.value = Application.WorksheetFunction.Sum(......)

nejak takto sa to myslim robi

skusim zajtra v praci, zatial dik obom

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

Formulář Faktura

Helios iNuvio

On-line nástroje