[elektro-etc] excel vba

Borza Attila attila.borza at t-online.hu
Thu Jun 25 16:55:28 CEST 2009


Szia Robi !

A cellát mindig egy betű, és egy szám határozza meg, ha jól látom, akkor 
itt a betű hiányzik az "i" változóból.
A másik, hogy cellára "Range"-el kell hivatkozni pl : If 
Range("a2").Values = .....
ha a cella változóból jön, és pl. fix az oszlop, mondjuk "a" , és a sor 
egy változó pl.: "i" ( integer)  akkor ....Range("a" &  i).....


Üdv
Attila

Fekete Róbert írta:
> halihó mindenki
>
> egy kedves ismerős keresett meg az alábbival.. mivel sose  kellett 
> excel vba ban programozni...
>
> Function Kiprobal(Cellak)
>
> Dim c, i, n As Integer
>
> c = 0
> n = Cellak.Count
> For i = 1 To n
>   If Cellak(i).Values = "A" Then  <---- Ez a sor nem jó, hibás a cella
>                                         értékre a hivatkozás, ez
>                                         kellene helyesen.
>     c = c + 1
>   End If
> Next i
> Kiprobal = c
> End Function
>
>
>
> ahogy nézem minden bizonnyal sor és oszlop hivatkozások is kellenének...
> de hogy hogy....
>
> ha valaki tuja legyen kedves elárulni amikéntjét...
>
> köszi
>
> FRob
>
> www.harden.hu
> www.loudlink.eu
>
> "Minden megoldható legalább egyszer
> és ha már egyszer megoldható..."
> Hosszú barátság titka a pontos elszámolás.
>
>



More information about the Elektro-etc mailing list