[elektro-etc] excel vba

[Fekete Róbert]

köszönöm!

továbbítom

R.

Borza Attila írta:
> 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.
>>
>>
> 
>