Busta Paga: Miglioramento Office 2016

[PasqualePartecipante Pasquale]

Ho risolto il precedente problema sulle giornate lavorative e volevo migliorare il foglio per renderlo più automatico.In primis ho aggiunto un pulsante associata ad una macro per copiare il foglio digitando il nome del nuovo foglio:

Sub Duplicafoglio()
Dim nomefoglio As String

nomefoglio = InputBox("Digitare il nome del foglio:")

If nomefoglio <> "" Then
ActiveSheet.Copy after:=Sheets(Sheets.Count)
ActiveSheet.Name = nomefoglio
End If
End Sub

Sarebbe utile poter inserire in automatico il mese di riferimento, cella "b9" e cancellare dei dati del nuovo foglio. Ho evidenziato due celle con un valore da non cancellare e uno con una formula da non cancellare.

Possibile?

Grazie

Allegati:

You must be logged in to view attached files.

[gianfranco55Partecipante gianfranco55 Karma: 91 pts]

ciao

guarda che in L62

ti manca la formula e ti sfalsa tutto

per il vba lascio agli esperti

[PasqualePartecipante Pasquale]

ciao, si ho controllato tutto e rimesso tutto a posto.

[Marius44Moderatore Marius44 Karma: 58 pts]

Ciao

Ottimo lavoro ma non da esperto EXCEL: le celle unite sono un inferno per VBA.

Per quanto riguarda le celle da ripulire quando si duplica il Foglio dovrebbe bastare concellare la/le colonne dove tu inserisci i dati manualmente; quelle con i calcoli che si basano sui valori inseriti andrebbero a 0(zero) senza modificare la struttura e/o le formule.

Cerca in rete una formula che non ti faccia spuntare il 31 aprile o il 30 febbraio. Le date (in automatico) devono essere quelle riferite al mese di pertinenza.

Ciao,

Mario

[gianfranco55Partecipante gianfranco55 Karma: 91 pts]

ciao

Marius

dove lo vedi che spunta il 30 febbraio

le formule che azzerano dopo il fine mese ce l' ha

ma ha saltato una cella e si sfalsa (ora dovrebbe avere corretto)

a mio avviso

si crea un foglio con la tabella senza dati (con formule e le fisse compilate)

e si usa sempre quella per creare i fogli nuovi.

si nomina il foglio con il mese o con la data

e si preleva il nome del foglio da inserire in B9

 

semplice vero?  

[Marius44Moderatore Marius44 Karma: 58 pts]

Ciao Gianfranco55

Avevo inserito la formula mancante ed ho duplicato (clic sul pulsante) il foglio denominandolo Febbraio ma la formula sotto mi riporta fino al 31 feb. Non so se ho fatto bene ma ho allegato un'immagine.

Per qunto riguarda il resto il tuo suggerimento è da seguire.

Ciao,

Mario

 

Allegati:

You must be logged in to view attached files.

[Autore]

Articoli