Macro per excel

di
covenat
il
1 risposte
C
covenat
Pochi posts
Iscritto da
nov, 2007
Messaggi:
1

Macro per excel

Salve ragazzi, ho bisogno di aiuto con vba . ho un foglio excel in cui in cells(1,c) con c = 1 to 20 ci sono dei valori x in ogni casella. devo creare una macro che : inserito un numero di una casella iniziale e uno di casella finale (sempre da 1 a 20) esegua il prodotto casella per casella da quella iniziale digitata a quella finale e mi mostri con msgbox il prodotto...
GRAZIE

1 Risposte

  • C
    Claudio
    Pochi posts
    Iscritto da
    ott, 2008
    Messaggi:
    1

    Re: Macro per excel

    Sub Macro4()
    '
    ' Macro4 Macro
    ' Macro registrata il 06/10/2008 da Administrator
    '
    Sheets("foglio1").Select

    app1 = 1
    appo = 1

    For r = 1 To 20
    Do While r > 20
    Loop

    appo = Cells(r, 1)

    app1 = app1 * appo

    Next r

    MsgBox "totale " & app1

    '
    End Sub
Devi accedere o registrarti per scrivere nel forum
1 risposte