Aggiorna numeri



  • Aggiorna numeri
    di Fausto (utente non iscritto) data: 27/05/2011

    1)in un elenco nella cella a4 è stata inserita la formula =conta.valori (a$2:a3)
    2) e' stata poi inserita la macro "inserire sotto con formule". quindi lanciando la macro si crea sotto una riga che aggiorna il contatore (2).
    mettiamo il caso che si abbia già un elenco e si voglia inserire una nuova riga, non sotto all'ultima, bensì fra le righe esistenti, posizionandosi quindi sul una riga e avviando la macro si ottiene una nuova riga con contatore aggiornato. il problema è quello di aggiornare manualmente i numeri delle celle posto al disotto.
    esiste qualche artifizio che possa aggiornarli in automatico?



  • di Aurelio (utente non iscritto) data: 01/06/2011

    Ciao fausto,

    non é molto chiara la domanda. tuttavia (tento): nn é una questione di riferimento del tipo di r1c1

    fai sapere.




  • di Aurelio (utente non iscritto) data: 01/06/2011

    Ciao fausto,

    non é molto chiara la domanda. tuttavia (tento): nn é una questione di riferimento del tipo di r1c1

    fai sapere.




  • di Mrt (utente non iscritto) data: 01/06/2011

    Il codice sotto inseriscr una riga sotto a quella della cella selezionata e copia nella nuova riga , colonna 3 la formula della cella sopra.
    puoi adattarlo alle tue esigenze , credo.
    ciao
     
    Sub Inserisci()
    Dim sht As Worksheets, MiaRiga As Integer
    
    With sht
    MiaRiga = ActiveCell.Row
    Rows(MiaRiga).Select
        Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
    
    Cells(MiaRiga, 3).Offset(-1, 0).Select
        Selection.Copy
        Cells(MiaRiga, 3).Select
        Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
            SkipBlanks:=False, Transpose:=False
        ActiveSheet.Paste
        Application.CutCopyMode = False
    
    End With
    End Sub