+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 4 su 4

[VBA] Calcolo Rata

  1. #1
    Bigarrow non è in linea Novello
    Ciao a tutti,

    dopo molto tempo torno a scrivere sul forum e vi propongo una piccola macro che ho creato per calcolare i piani di ammortamento di mutui/prestiti.

    Il sistema calcola unicamente i mutui con sistema a rata fissa ed è stato testato in ambiente Win 2000 / Win XP con MSOffice Excel 2003 e 2007.

    Spero vi piaccia.

    Link: MEGAUPLOAD - The leading online storage and file delivery service

    ciao a tutti

  2. #2
    L'avatar di dragone bianco
    dragone bianco non è in linea Certosino
    Ciao

    molto utile e semplice da usare
    A parte l'uso dei Select e delle formule che VBA scrive nelle celle
    mi sembra OK

    Dal punto di vista strutturale io avrei creato un modulo contenente una o più funzione da richiamare e restituisce i vari valori (un array di valori o semplicemente un singolo dato

    dalla tua premessa
    dopo molto tempo torno a scrivere sul forum e vi propongo una piccola macro che ho creato per calcolare i piani di ammortamento di mutui/prestiti.
    sembra che tu abbia realizzato qualcosa del genere

    Ciao
    ℹ️ Leggi di più su dragone bianco ...

  3. #3
    Bigarrow non è in linea Novello
    Grazie Dragone per il suggerimento.

    Mi interesserebbe sapere cosa intendi dire, potresti approfondire la cosa magari facendo qualche esempio pratico? Non mi dispiacerebbe migliorarlo se possibile.

    Per l'appunto che mi fai sui select e sulle formule, scusa l'ingenuità, ma mi spiegheresti meglio cosa non va, sono curioso di sapere come potrei migliorare anche quell'aspetto se possibile.

    Grazie ancora e ciao

  4. #4
    L'avatar di dragone bianco
    dragone bianco non è in linea Certosino
    Quote Originariamente inviato da Bigarrow Visualizza il messaggio
    Grazie Dragone per il suggerimento.

    Mi interesserebbe sapere cosa intendi dire, potresti approfondire la cosa magari facendo qualche esempio pratico? Non mi dispiacerebbe migliorarlo se

    possibile.

    Per l'appunto che mi fai sui select e sulle formule, scusa l'ingenuità, ma mi spiegheresti meglio cosa non va, sono curioso di sapere come potrei

    migliorare anche quell'aspetto se possibile.

    Grazie ancora e ciao
    Ciao

    allora l'apunto sui select è questo
    prendo la sub Autorun tua
    Sheets("AMMORTAMENTO").Select
    Range("A3:K500").Select
    Selection.ClearContents
    Range("P5:P20").Select
    Selection.ClearContents
    [a1].Select
    UserForm1.Show
    
    si semplifica in
    Sheets("AMMORTAMENTO").Range("A3:K500").ClearContents
    Sheets("AMMORTAMENTO").Range("P5:P20").ClearContents
    UserForm1.Show
    
    migliorando l'esecuzione del codice

    invece per l'altro discorso intendo l'uso delle funzioni (Messe in un modulo)
    ad una funzione (Function) puoi passargli dei valori ed essa te li restituisce dopo l'elaborazione

    es:
    function Operazione(ValoreA As double,ValoreB as Double, Operazione as string)as string
    Dim Risultato as variant
    
    select case Operazione
       Case="+" 'Somma
          Risultato=ValoreA+ValoreB
       Case="-" 'Sottrazione
          Risultato=ValoreA-ValoreB
       Case="/" 'Divisione
          Risultato=ValoreA/ValoreB
       Case="*" 'Moltiplicazione
          Risultato=ValoreA*ValoreB
       Case else
          Risultato="Operazione non consentita"
    end select
    
    'restituisce il valore
    Operazione=Risultato
    end function
    
    e la richiami semplicemente così
    Sub prova()
    Dim Calocolo
    Calcolo=fncOperazione(1, 2, "+")
    
    msgbox
    End Sub
    
    Così dai la possibilità ad ognuno di usare la tua funzione e realizzare la grafica a proprio piacimento.

    Questo è un esempio generico
    puoi anche far restituire degli array

    Ciao
    ℹ️ Leggi di più su dragone bianco ...

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. Calcolo età
    Da Carlo1088 nel forum Microsoft Access
    Risposte: 13
    Ultimo Post: 25-05-2016, 20:51
  2. calcolo p value
    Da elisabetta200 nel forum Microsoft Excel
    Risposte: 6
    Ultimo Post: 19-10-2014, 10:08
  3. Calcolo SLA
    Da lligio nel forum Microsoft Excel
    Risposte: 16
    Ultimo Post: 04-03-2013, 08:46
  4. Calcolo ore
    Da AleSpi nel forum Microsoft Word
    Risposte: 3
    Ultimo Post: 09-08-2009, 15:38
  5. calcolo in VBA
    Da 6vior nel forum Microsoft Word
    Risposte: 7
    Ultimo Post: 27-06-2007, 14:00