• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Fórum

Příspěvky uživatele

A nebo ještě jinak:

Tak jsem si dovolil nahlédnout
A Bohužel se mi také zobrazuje chyba (Excel 2007)
Method 'Select' of object 'Shape' failed

Chvilku sem si s tím hrál a dopadlo to takto viz soubor. Po přidání řádku (označen vykřičníky se chyba již nezobrazuje.

Vlastní fce mi moc nejdou
Jediný co se mi podařilo s tím udělat je, že ti fce vrátí počet buněk s komentářem v celým listu.

Snad sem koukne někdo zdatnější

Pomocí vzorečku to nepůjde - nebo o takové fci nemám páru, ale vyzkoušej makro v souboru

Jestli chceš to makro spouštět automaticky při otevření sešitu, tak ho musíš vložit do modulu sešitu (ThisWorkbook) né listu, jako Private Sub Workbook_Open()

Jeden malý maticový

Co takhle:
Sub secti()
'sečte hodnoty v buňkých A1 a B2
Soucet = Range("A1").Value + Range("B2").Value
'do buňky A1 zapíše součet buněk A1 a B2
Range("A1").Value = Soucet
'vymaže hodnotu v buňce B2
Range("B2").ClearContents

End Sub

Na toto řešení by snad stačili obyčejné vzorce viz příklad

Edit
pokud hodnota v buňce A1 má tvar a=12,6
tak stačí upravit vzorec

=HODNOTA(ČÁST(A1;NAJÍT("=";A1;1)+1;DÉLKA(A1)))

druhý pokus:
Tak to opět nejde

Stáhni si to zde
http://leteckaposta.cz/938494064

Tak ten předchozí MsgBox mi taky jede bez problému. Co se týče toho druhého můžeš si ho nastavit stejně jako ten první.
MsgBox "Registrační kód a informace byly uloženy do souboru:" & vbCrLf & """" & Jmeno_souboru & """" & _
vbCrLf & "v adresáři:" & vbCrLf & """" & Adresa & """" & vbCrLf & _
"Pro pokračování klikněte na " & """" & "Ok" & """" & " a " & """" & "Dokončit" & """", _
vbOKOnly + vbInformation, "Uložení souboru ..."


Jestli těmi mezerami myslíš mezeru mezi uvozovkami tak se koukni na toto:
MsgBox "Registrační kód a informace byly uloženy do souboru:" & vbCrLf & """ " & Jmeno_souboru & " """ & _
vbCrLf & "v adresáři:" & vbCrLf & """ " & Adresa & " """ & vbCrLf & _
"Pro pokračování klikněte na " & """" & "Ok" & """" & " a " & """" & "Dokončit" & """", _
vbOKOnly + vbInformation, "Uložení souboru ..."

COUNTIF
COUNTIFS

Jen taková střela od boku

TextBox2.Text = Format$(Time, "hh:mm")

Ahoj, jelikož máš přístup do VBA v souboru "Opravy lokomotiv...." chráněn heslem, tudíž se tam nedostanu. Tak sem upravil makro v původním souboru "spočítej", tak se na to mrkni.

PS: Když budeš chtít, je možnost nezapisovat nulový počet (nulu) do buněk ve sloupcích AK a AL nebo ji nahradit jiným znakem.

Ahoj, Tvůj soubor žádná makra neobsahuje, tak sem zkusil narychlo jedno slepit.

Jelikož mi soubor nejde vložit, tak si ho stáhni zde:
http://leteckaposta.cz/282163487

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Formulář Faktura

Helios iNuvio

On-line nástroje