A čo tak CTRL+C a CTRL+V.
Mám tabulku s úvěry klientů.
---------------------
Dobre si ju schovaj, aby ti niekto nevykradol tvoje Knowhow.
Sperhak napsal/a:
Ked si to hodite do excelu tak to je prehladnejsie. Takto tu to naozaj pôsobý rozsiahlo.
No uvidíme, kto bude mať nervy toto všetko prečítať
Range("List1!B2") = Application.WorksheetFunction.VLookup(Range("List1!A2"), Range("List2!A1:E6"), 3, 0)
kabaka napsal/a:
Keď označí celý prvý stĺpec a aplikuje makro tak sa text vloží do celého stĺpca B, to znamená, že aj vtedy, keď nie je bunka vyplnená.
Predpokladám, že označíš prvý stlpec.
Sub Makro1()
For Each bunka In Selection
bunka.Offset(, 1000).End(xlToLeft).Offset(, 1) = "tvoj text"
Next bunka
End Sub
Existuje udalostné makro CHANGE. Ale na ktoré bunky sa má použiť je z tvojho popisu záhadou.
CMM-Team napsal/a:
Omlouvám se, ale nerozumím následující větě:
"místo B1 je odkaz nesmyslnou adresu buňky"
Mám to tedy chápat tak, že Pavlusův vzorec není v pořádku, nebo že jsem jej špatně použil já ?
=VLOOKUP(B2;b!A2:D6;3)
=SVYHLEDAT(B2;b!A2:D6;3)
Že by takto?
Public Sub aaaa()
For i = 0 To 7
If i <> 1 And i <> 2 Then
Range("D4:D200").Offset(0, i).Select
' tvoj kod
End If
Next i
End Sub
=SUMA(A:A)-SUMA(A1:A3)
alebo
=SUMA(POSUN(A4;;;ŘÁDKY(A:A)-3))
A čo by mal byť výsledok?
Ťažko radiť, keď si nedával pozor na matematike.
a čo toto?
=IF(I2>=(WEEKDAY(6;1));(J2-24);IF(I2>=(WEEKDAY(4;1));(J2-48);(J2)))
lukhas napsal/a:
Skúšal som, pôvodná veľkosť cca 16 MB a po zbalení 2,7 MB
H napsal/a:
OK, v zásadě funguje, pouze nelze zadat název "T1", ale chce to po mě podtržítko "_T1".
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.