Re: Excel fce

From: Kamil Sverak (sverak@csadbk.cz)
Date: 05. 10. 1999, 12:47 CEST


> Dalsi sposob ktory ma napadol (za predpokladu ze sa bude zoznam zvacsovat)
> pristupovat ku suboru ako k XLS databaze spravit formicku kde bude query
> ktore hodi
> sumu z Like. Takze ak zada niekto do vyberoveho pola napr Ka vybereto sumu
> vsetkych
> Karlov Kaviarov atd...
> v exceli v Helpe pre VBA vyhladaj OpenRecordset alebo Connect to...
> nad fciou som si vcera lamal hlavu ale ziadna ma nenapadla

Kdyz trvas na funkci, neni problem ju napsat.
BTW: Slo by pouzit i kombinace standartnich fci v excelu, ale problem je ze
nemam silu se prolouskavat v vyrazech jako ("kdyz", "cast", "delka", "opakovat"
....) kterej inteligent CZ M$ to vynalezl grrr :(((

Ta slibena funkce: staci vlozit do C1 " =Prvni(A1)" a melo by to fungovat
----------------------------------
Function Prvni(bunka)
    Dim i As Integer, pom As String

    For i = 1 To Len(bunka)
        If Mid(bunka, i, 1) = " " Then Exit For
        pom = pom & Mid(bunka, i, 1)
    Next i
    Prvni = pom
End Function
----------------------------------



This archive was generated by hypermail 2.1.2 : 03. 09. 2001, 22:17 CEST