Ga naar inhoud

VBA cellen optellen


anoniem

Aanbevolen berichten

Hallo! Ik ben sinds kort pas bezig met VBA dus nog niet echt gekneist hierin. Kan iemand mij zeggen hoe ik in VBA twee cellen uit verschillende bestanden bij elkaar kan optellen. Door middel van een gewone macro opnemen lukt me dit wel, maar de VBA van de macro uit de module knippen en plakken in het blad bij "private sub" lukt me niet. Hieronder de VBA van de private sub. Het blauwe gedeelte is waar het mij om gaat. Dit zal nu wel helemaal niet kloppen omdat ik al een beetje aan het uitproberen ben geweest. Private Sub Februari2009_Click() 'Orders Inkomende 1 'maand februari Range("G11").Select ActiveCell.FormulaR1C1 = "='G:\HGL\KRI\Firma\BRC\ADMINISTR. Orders\Orders.2009\[orders.commercieel.2009.xls]Firma'!R[-5]C[-2]" 'Culumatief Range("H11").Select ActiveCell.FormulaR1C1 = "='G:\HGL\KRI\Firma\BRC\ADMINISTR. Orders\Orders.2009\[orders.commercieel.2009.xls]Firma'!R[-5]C[8]" 'Orders Inkomende 2 'maand februari Range("G12").Select [color=blue:db2524aa10][b:db2524aa10]ActiveCell.FormulaR1C1 = _ "=[orders.commercieel.2009.nieuweversie.xls]Firma!R-6]C[-3]" & _ "[Overzicht 2009.xls]KRC-cijfers!R[-3]C[42]"[/b:db2524aa10][/color:db2524aa10] 'Culumatief Range("H12").Select [color=blue:db2524aa10][b:db2524aa10]ActiveCell.FormulaR1C1 = "=G:\HGL\KRI\Firma\KRC\zz.Orders\[Overzicht 2009.xls]BRC-cijfers!R[7]C[42]+'G:\HGL\KRI\Firma\BRC\ADMINISTR. orders\[orders.commercieel.2009.xls]Firma!'R[-6]C[7]"[/b:db2524aa10][/color:db2524aa10] End Sub Hoop dat iemand mij kan helpen. Groetjes Yvonne
Link naar reactie
volgens mij moet je nog aangeven welk bestand de informatie bevat. En als de files niet in dezelfde directory staan natuurlijk dan de hele path opgeven. [quote:31b8490964] 'Orders Inkomende 2 'maand februari [color=red:31b8490964]Windows("orders.commercieel.2009.nieuweversie.xls").Activate[/color:31b8490964] Range("G12").Select [color=blue:31b8490964][b:31b8490964]ActiveCell.FormulaR1C1 = _ "=[orders.commercieel.2009.nieuweversie.xls]Firma!R-6]C[-3]" & _ "[Overzicht 2009.xls]KRC-cijfers!R[-3]C[42]"[/b:31b8490964][/color:31b8490964] 'Culumatief [color=red:31b8490964]Windows("orders.commercieel.2009.xls").Activate[/color:31b8490964] Range("H12").Select [color=blue:31b8490964][b:31b8490964]ActiveCell.FormulaR1C1 = "=G:\HGL\KRI\Firma\KRC\zz.Orders\[Overzicht 2009.xls]BRC-cijfers!R[7]C[42]+'G:\HGL\KRI\Firma\BRC\ADMINISTR. orders\[orders.commercieel.2009.xls]Firma!'R[-6]C[7]"[/b:31b8490964][/color:31b8490964] [/quote:31b8490964]
Link naar reactie
Dat dacht ik ook in eerste instantie dus daar heb ik al een beetje mee lopen spelen/puzzelen. Maar het stukje daarboven "Orders inkomende 1" komt de informatie ook uit andere bestanden en die pakt die wel gewoon goed. Ik denk zelf dat de wijze van optellen van de cellen zoals ik dat wil doen niet de juiste is. Maar ik wil er voor de duidelijkheid bij zeggen dat de paden naar het bestand toe fictief zijn. Het is nl voor mijn werk dus heb het eea even aangepast.
Link naar reactie

Om een reactie te plaatsen, moet je eerst inloggen

Gast
Reageer op dit topic

×   Geplakt als verrijkte tekst.   Herstel opmaak

  Er zijn maximaal 75 emoji toegestaan.

×   Je link werd automatisch ingevoegd.   Tonen als normale link

×   Je vorige inhoud werd hersteld.   Leeg de tekstverwerker

×   Je kunt afbeeldingen niet direct plakken. Upload of voeg afbeeldingen vanaf een URL in

  • Populaire leden

    Er is nog niemand die deze week reputatie heeft ontvangen.

  • Leden

    Geen leden om te tonen

×
×
  • Nieuwe aanmaken...