Somma celle

  • Somma celle di K@rlo
    Salve, non riesco a risolvere questo problema con il vba.

    devo inserire da vba in una data cella questo:

    =q1218+r1218

    compreso =, ma puntualmente non funziona.

    la formula che sto usando è la seguente, ma a me serve che nella cella ci sia l'intera formula non solo il risultato, questo perchè mi capita di dover modificare la colonna q o la r, quindi il risultato cambia.

    ho anche provato con i checkbox, ma il segno uguale mi rimane come testo, quindi mi tocca sempre cliccare sopra ed inviare per rendere valido il calcolo.

    spero di aver spiegato bene il problema.
    grazie
     
    Attualmente uso:
    
    Sheets("Foglio").Cells(v_inter, 19) = Sheets("Foglio").Cells(v_inter, 17) + Sheets("Foglio").Cells(v_inter, 18)
    
    

    di Big ronnie
    Prova così:worksheets(1).range("a1") = "=q1218+r1218"


    di Enzo
    Puoi anche inserire

     
    Range("A1").Value = "=q1218+r1218"
    

    di Big ronnie
    Ciao enzo,non sappiamo se la macro è inserita nell'editor del foglio o di un modulo quindi è meglio specificare anche il nome del foglio.eventualmente la tua riga è esattamente come la mia anche se io ho tralasciato ".value".

    di Enzo
    ....giusto

    di K@rlo
    Grazie, ora provo e vi dico quale userò. che vinca il migliore

    di K@rlo
    Ho risolto con questa:
    sheets("foglio").cells(v_inter, 19).value = "=q:q + r:r"

    grazie.

    altro problema inerente alla formula, non riesco ad ottenere il risultato di:

    sheets("foglio").cells(v_inter, 19).value =

    in excel funziona, ma lanciata dal vba no, mi da errore, dove sbaglio?

    grazie 1000

    Somma celle di Ricky53
    Se con
    [sheets("foglio").cells(v_inter, 19).value =]

    vuoi cancellare il contenuto della cella corrispondente devi sscrivere così:

    [sheets("foglio").cells(v_inter, 19).value = ""]

    altrimenti devi dire cosa vuoi fare dopo l'uguale.
    ciao, ricky 53

    di K@rlo
    Scusa, non è riuscito il copia incolla:
     
    sheets("foglio").cells(v_inter, 19).value = "=(p:p*q:q) + r:r" 
    
    

    Somma celle di Ricky53
    Ho provato la tua formula con vba e funziona tutto: ottengo il risultato atteso. non ho capito qualcosa?

    una domanda perchè utilizzi p:p, q:q, r:r e non le celle indirizzate da "v_inter" tipo il seguente esempio:

    sub prova_riempimento()
    for v_inter = 1 to 10
    sheets("foglio").cells(v_inter, 1).value = "=p" & v_inter & "*q" & v_inter & " + r" & v_inter
    next v_inter
    end sub

    (nota: ho eliminato le parentesi perchè nella moltiplicazione non servono.)

    in questo modo puoi riempire tutte le celle che vuoi.

    ciao, ricky53

    di K@rlo
    Grazie ricky53

    non ho pensato alla possibilità che mi hai proposto, perchè non so per quale errore, la formula di prima non andava.
    ora ho immesso la tua.
    sheets("foglio").cells(v_inter, 1).value = "=p" & v_inter & "*q" & v_inter & " + r" & v_inter

    grazie

    Somma celle di Ricky53
    Ciò che faccio è collaborare con tutti mettendo a disposizione la mia conoscenza e chiedendo quando non conosco.
    mi fa piacere se ti sono stato utile.
    buon proseguimento e quano hai dubbi scrivi.
    ciao ricky53