< návrat zpět

MS Excel


Téma: Tlačítko DOLů rss

Zaslal/a 5.1.2015 10:39

Ahoj,
potreboval by som pomôcť s jedným príkazom. Ide mi o to, aby v tabulke po stlačení tlačítka "dolů" sa kurzor dostal vždy na začiatok posledného riadku.
Mám niečo takéto, alebo vždy mi vypisuje chybu:

Sub dolu()
Dim FrstR As Long, FrstCll As Range
With ActiveSheet
FrstR = .Range(.Range("H17"), .Range("H17").End(xlDown)).Rows.Count
Set FrstCll = .Range("B17").Offset(FrstR, 0)
End With
Range(FrstCll.Address).Activate
End Sub

Ďakujem. P.

stop Uzamčeno - nelze přidávat nové příspěvky.

#022981
avatar
skusal som to u seba a umna to ide bez problemov ... poslite prilohu alebo napiste o aku chybu ide?citovat
#022982
avatar
aj ked ja by som to napisal trosku jednoduchsie a to takto:
Range("H17").End(xlDown).Offset(1, -6).Selectcitovat
#022986
avatar
http://leteckaposta.cz/695300509

tu som dal fotky chýb, čo mi píše
ďakujemcitovat
#022987
avatar
Ahojte,
už to funguje. Asi sa tu nadobro pochovám, ale tam musia byť vyplnené minimálne dva riadky v tabulke a potom to funguje
Ospravedlňujem sa a ďakujem za čas
P.citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje