Příspěvky uživatele

*udělal bych takto:

Sub HURA()

Dim r1 As Range

Set r1 = Range("F1:F10")

For Each cell In r1
If cell.Value = 10 Then
cell.Offset(0, 1) = "hurá"
End If
Next cell

End Sub

Nevím jestli chápu dobre ale udelal bych
do C8:
=VVYHLEDAT(B3;$N$6:$Y$8;3;0)

*Pokud by někdo tušil muzu poslat osobni zpravu s konkretnim souborem a pokud to nekdo dokaze vysvetlit tak ze to nasimuluju, zaplatim kolik bude treba.

Zde je kompletni protokol:

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<recoveryLog xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main"><logFileName>error237600_01.xml</logFileName><summary>V souboru C:\Users\marti\OneDrive\Plocha\err.xlsm byly zjištěny chyby.</summary><additionalInfo><info>Aplikace Excel dokončila ověření platnosti a opravu na úrovni souboru. Některé části tohoto sešitu byly pravděpodobně opraveny nebo zahozeny.</info></additionalInfo><removedParts><removedPart>Nahrazená část: Část /xl/worksheets/sheet3.xml s chybou XML. Hodnota atributu nesmí obsahovat <. Řádek 2, sloupec 11031825</removedPart></removedParts><removedRecords><removedRecord>Odebrané záznamy: Pojmenovaná oblast z části /xl/workbook.xml (Sešit)</removedRecord><removedRecord>Odebrané záznamy: Vlastnosti listu z části /xl/workbook.xml (Sešit)</removedRecord><removedRecord>Odebrané záznamy: Informace o buňce z části /xl/worksheets/sheet4.xml</removedRecord></removedRecords><repairedRecords><repairedRecord>Opravené záznamy: Informace o buňce z části /xl/worksheets/sheet4.xml</repairedRecord><repairedRecord>Opravené záznamy: Podmíněné formátování z části /xl/worksheets/sheet4.xml</repairedRecord></repairedRecords></recoveryLog>

Zdravim
nesetkal se nekdo s errhlaskou pri otevrenim sesitu kde nasledne sesit prijde o vsehny data?
Hodnota atributu nesmi obsahovat <....

Zajimalo by me jak k teto chybe muze dojit abych ji mohl predejit. Hlaska viz priloha.

Děkuji za rady

elninoslov
musím napsat jeste jednou a PODEKOVAT todle je VELKA PECKA

DÍKY

elninoslov
MASAKR reseni to jsem necekal ze je mozne aani, urco budu mega pouzivat. Děkuji

Dingo
super VBA reseni takto bych se to spravne mel naucit ale asi neni diky elninoslov treba

Děkuji pánové za pomoc hezký víkend

*chtěl bych výsledek z funkce:
=CONCATENATE(ROK(EDATE(DNES();-1));""_"";KDYŽ(MĚSÍC(EDATE(DNES();-1))>9;MĚSÍC(EDATE(DNES();-1));CONCATENATE(0;MĚSÍC(EDATE(DNES();-1)))))
= 2020_08

vrátit ve VBA do promene DATUMx
bez pouziti listu excelu

Zdravím,
mám dotaz zda je nějak možné převzít LOCAL fukci se kterou pracuju ve VBA rovnou do promene bez toho aniz bych ji musel vracet na list a pak zpet z listu zas do VBA.
Je nutne zachovat LOCAL funkci to ze bych ji mohl prepsat rovnou na VBA funkce vim ale nechce se mi tak se ptam jestli je to mozne pokud ne zacnu se ucit VBA funkce více nu.

Dekuji za radu viz příloha

elninoslov
supeeer lehci nez jsme cekal to by me nenapadlo myslel jsem si ze to false vraci ty tlacitka nejak :D
DĚKUJI mooc

Zdravi,
dokazal by nekdo upravit imputbox tak abych i kdyz kliknu na ne ci krizek aby se mi do bunky nevepsalo false ale vzdy se potrdilo co je zadane v policku?
Viz priloha.

marjankaj
kam na to chodim nu, vzdy se nejak samo objevi

.
DĚKUJI MOC funguje skvele. SUPER

Pomocny sloupec prave pouzivat nechci ale asi nic jineho nezbyde..

* kde z oblasti K:K potrebuji dostat jen datum ktery bude vzdy zacinat do prvni mezery

=SUMIFS(L:L;J:J;O13;K:K;">"&P12)

nejak tam dostat =ZLEVA(K13;NAJÍT(" ";K13;1))+0

...

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje