VBA-ban tudnátok segíteni?
Figyelt kérdés
Ezt a feladatot kéne megoldanom:
Írjon olyan függvényt, amely egy cellatartományt kap inputként, és az outputja az, hogy mennyi cella tartalmaz hárommal osztható számot!
Köszi!
2016. jan. 2. 16:35
1/3 anonim ![*](//static.gyakorikerdesek.hu/p/vsz2.png)
![*](//static.gyakorikerdesek.hu/p/vsz2.png)
![*](//static.gyakorikerdesek.hu/p/vsz2.png)
![*](//static.gyakorikerdesek.hu/p/vsz2.png)
válasza:
![*](http://static.gyakorikerdesek.hu/p/vsz2.png)
![*](http://static.gyakorikerdesek.hu/p/vsz2.png)
![*](http://static.gyakorikerdesek.hu/p/vsz2.png)
![*](http://static.gyakorikerdesek.hu/p/vsz2.png)
![*](http://static.gyakorikerdesek.hu/p/vsz2.png)
Persze, mi nem megy? Hol akadtál el?
2/3 A kérdező kommentje:
nem tudom, hogy kéne megadni, hogy tartományt válasszon ki, majd abban minden cellára leellenőrizze, hogy osztható-e 3-al.
eddig jutottam, nyilván sok hiba van benne, nem is fut le:
Function mas(x As Range) As Integer
Dim db As Integer
For Each Cells In x
If Int(x) / 3 = x / 3 Then
db = db + 1
End If
Next
mas = db
End Function
2016. jan. 2. 16:41
3/3 anonim ![*](//static.gyakorikerdesek.hu/p/vsz2.png)
![*](//static.gyakorikerdesek.hu/p/vsz2.png)
![*](//static.gyakorikerdesek.hu/p/vsz2.png)
![*](//static.gyakorikerdesek.hu/p/vsz1.png)
válasza:
![*](http://static.gyakorikerdesek.hu/p/vsz2.png)
![*](http://static.gyakorikerdesek.hu/p/vsz2.png)
![*](http://static.gyakorikerdesek.hu/p/vsz2.png)
![*](http://static.gyakorikerdesek.hu/p/vsz1.png)
![*](http://static.gyakorikerdesek.hu/p/vsz0.png)
Az if utáni feltétel legyen Int(x) Mod 3 = 0. A Mod jelent maradekos osztást. Ha egy szam 3-as maradéka nulla, akkor osztható 3-ál.
További kérdések:
Minden jog fenntartva © 2025, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu
A weboldalon megjelenő anyagok nem minősülnek szerkesztői tartalomnak, előzetes ellenőrzésen nem esnek át, az üzemeltető véleményét nem tükrözik.
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!