> Dnes jsem se pustil poprve do maker a potreboval bych poradit s jednou
veci.
> Mam tady tabulku, kde je v jedne bunce vzdy zapsane jmeno a prijmeni.
> Potrebuji to rozdelit tak, aby bylo jmeno v jedne a prijmeni ve druhe. Je
to
ahoj, pekne ti na to posluzia funkcie:
InStr - vrati poziciu hladaneho retazca v inom retazci (v tvojom pripade
budes hladat medzeru)
Left - vrati stanoveny pocet znakov zo zaciatku retazca (v tvojom pripade
bude pocet znakov: pozicia medzery v retazci minus jedna)
Mid - vrati stanoveny pocet znakov od stanovenej pozicie v retazci (v tvojom
pripade od pozicie medzery plus jedna az do konca, preto nezadavas treti
nepovinny parameter)
Left - vrati stanoveny pocet znakov od konca retazca
ukazka ako vydolujes priezvisko a meno z bunky a1 (do toho tvojho makra si
to uz zapasujes, no nie?):
Dim strCeleMeno As String
strCeleMeno = Range("a1").Text
MsgBox Left(strCeleMeno, InStr(strCeleMeno, " ") - 1)
MsgBox Mid(strCeleMeno, InStr(strCeleMeno, " ") + 1)
na pohyb po bunkach relativne vzhladom k nejakej inej bunke sa v helpe pozri
na metodu Offset objektu Range
mifko
This archive was generated by hypermail 2.1.2 : 11. 04. 2002, 23:13 CEST