login  Naam:   Wachtwoord: 
Registreer je!
 Forum

VBA totaalprijs probleem

Offline roberini - 22/08/2008 18:08
Avatar van roberiniHTML beginner
vbnet code - Bekijk de code zonder highlighting - Klap code in 
  1. ActiveCell.Offset(1, 6).Activate
  2. ActiveCell.Formula = " = SUM(R[-" & X + 1 & "]C:R[-2]C)"


Ik wil dus een totaalprijs krijgen, maar als ik het programmatje dan test, dan komt er dit te staan in plaats van de totaalprijs

vbnet code - Bekijk de code zonder highlighting - Klap code in 
  1. = SUM(R[-3]C:R[-2]C)


wat doe ik fout?

9 antwoorden

Gesponsorde links
Offline Stijn - 22/08/2008 22:02
Avatar van Stijn PHP expert 1) Klopt die formule?
2) Doe die spaties in het begin van je formule eens weg.
3) Probeer het eens zonder gelijkheidsteken.
Offline roberini - 23/08/2008 09:51 (laatste wijziging 24/08/2008 19:25)
Avatar van roberini HTML beginner Ik heb dit in een boekje opgezocht, omdat ik nog niet wist hoe je een totaalbedrag kreeg, dus ik neem aan dat het klopt ja.

Het is eigenlijk de bedoeling dat hij de getallen in rij G(excel) bij elkaar optelt en dan uitkomt op een uit eindelijk getal.

Kan het eigenlijk ook anders?
Offline Stijn - 24/08/2008 22:21
Avatar van Stijn PHP expert Gewoon iedere cel overlopen in de kolom G en de waarde optellen. Of je geeft inderdaad die formule mee en zeg dat het bereik begint bij G1:G2000 ofzo.
Offline roberini - 25/08/2008 10:35 (laatste wijziging 25/08/2008 10:35)
Avatar van roberini HTML beginner Het is van te voren nog niet bekend hoe lang het gaat worden, dus daarom heb ik daarvoor een For next lus die vertelt hoelang die rij onder kolom G gaat worden. Moet ik die ook posten?
Offline Abbas - 25/08/2008 11:33
Avatar van Abbas Gouden medaille

Crew .NET		 Misschien is dat wel handig ja! 
Offline Ontani - 25/08/2008 11:34
Avatar van Ontani Gouden medailleGouden medailleGouden medailleGouden medaille

-1		 en anders pak je toch gewoon het maximum aantal rijen

G1:G65536
Offline roberini - 25/08/2008 12:14
Avatar van roberini HTML beginner
vbnet code - Bekijk de code zonder highlighting - Klap code in 
  1. For X = 0 To Me.lstFactuur.ListCount - 1
  2.   ActiveCell.Value = X + 1
  3.   ActiveCell.Offset(0, 1) = Me.lstFactuur.Column(0, X)
  4.   ActiveCell.Offset(0, 2) = Me.lstFactuur.Column(1, X)
  5.   ActiveCell.Offset(0, 3) = Me.lstFactuur.Column(2, X)
  6.   ActiveCell.Offset(0, 4) = Me.lstFactuur.Column(3, X)
  7.   ActiveCell.Offset(0, 5).Formula = "=B" & X + 4 & "*D" & X + 4
  8.   ActiveCell.Offset(0, 6).Formula = "=F" & X + 4 & "+(E" & X + 4 & "*F" & X + 4 & ")"
  9.   ActiveCell.Offset(1, 0).Activate
  10. Next X
Offline Abbas - 25/08/2008 13:27
Avatar van Abbas Gouden medaille

Crew .NET
Ontani schreef:
en anders pak je toch gewoon het maximum aantal rijen

G1:G65536
Geheugen teveel misschien?! :D
Offline Ontani - 25/08/2008 14:06
Avatar van Ontani Gouden medailleGouden medailleGouden medailleGouden medaille

-1		 Met hopen
Gesponsorde links
Dit onderwerp is gesloten.
Actieve forumberichten
© 2002-2024 Sitemasters.be - Regels - Laadtijd: 0.181s