Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

Inserimento dati

Ultimo Aggiornamento: 10/09/2020 16:37
Post: 34
Registrato il: 21/07/2020
Età: 35
Utente Junior
2016
OFFLINE
09/09/2020 18:50

Inserimento dati
Ciao a tutti, sono alle prese con un problema che solo voi mi potete risolvere. Nel file allegato ho bisogno di inserire la data sempre nella cella A3 la stessa cosa vale per la cella B3. Grazie mille
Post: 34
Registrato il: 21/07/2020
Età: 35
Utente Junior
2016
OFFLINE
09/09/2020 18:52

Scusatemi, ecco il file allegato.
09/09/2020 20:36

>>>la data sempre nella cella A3
Cosa significa? >>>la stessa cosa vale per la cella B3
Sta a Te decidere se mettere la formula in B3 =A3
Oppure le formule =Adesso() o Oggi()
Per una data "fissa" ci vuole il VBA

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A:A")) Is Nothing Then Target.Offset(0, 1).Value = Now 'o Date
End Sub

Ps. Per inserire il codice nel forum, dov'è il tasto "CODE"
[Modificato da ABCDEF@Excel 09/09/2020 20:38]
Post: 35
Registrato il: 21/07/2020
Età: 35
Utente Junior
2016
OFFLINE
09/09/2020 21:50

Salve ABCDE@excel, in effetti nella cella A3 devo per forza maggiore inserire la data (la prossima sarà 11/9/20) e così vale anche per la cella B3.Ok?
Post: 36
Registrato il: 21/07/2020
Età: 35
Utente Junior
2016
OFFLINE
09/09/2020 21:53

Attualmente inserisco una nuova riga in A3 in modo che così si libera la cella A3 per poi scrivere la prossima data.
10/09/2020 11:31

Sarò io che non capisco, oppure non riesci spiegarti bene...
In colonna B ci sono solo dei numeri non date?
Comunque se fai doppio_click in cella A3, il VBA inserisce una nuova riga e mette la data di A4 superiore di 1 giorno (idem in B3)
Se desideri la data odierna, nel VBA elimina riga4/5 e togli alla riga 6/7 l'apice (')
Post: 37
Registrato il: 21/07/2020
Età: 35
Utente Junior
2016
OFFLINE
10/09/2020 11:53

La data non è mai superiore di un giorno. In effetti le date sono ogni martedì, Giovedì e sabato di ogni settimana. Sabato devo inserire manualmente la data, 12/09/20 poi martedì prossimo, 15/9/20 poi giovedì 17/9/20 e così via. Però il cambiamento della data deve avvenire sempre nella cella A3
10/09/2020 12:36

Se fai doppio-clik sabato,martedì,giovedì mette le date giuste con le riga4/5 cancellate e le righe6/7 senza l'apice (').

Questo si comporta in modo differente, scrivi la data in A2. Il VBA aggiunge la riga +data in B3
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A2")) Is Nothing Then
    Application.EnableEvents = False
    Rows("2:2").Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
    Cells(3, 2) = Cells(3, 1)
    Application.EnableEvents = True
End If 
Post: 38
Registrato il: 21/07/2020
Età: 35
Utente Junior
2016
OFFLINE
10/09/2020 14:57

Scusa ABCDEF@excel, senza il VBA si può risolvere il problema magari con qualche formula. Grazie mille
10/09/2020 16:37

Senza VBA..., aggiungi manualmente la riga e scrivi la data in A3.
In B3 metti =A3 oppure =se(A3="";"";A3)

Sicuramente non ho capito cosa intendi fare.
Vota:
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Cerca nel forum
Tag discussione
Discussioni Simili   [vedi tutte]
Inserimento dati rigo sbagliato. (11 messaggi, agg.: 23/12/2023 13:17)
Verificare dati collegati da inserimento libero (4 messaggi, agg.: 31/08/2017 20:42)
Mask inserimento dati magazzino e scorporo vendite (10 messaggi, agg.: 19/11/2019 16:04)
copiare dati da un foglio ad un altro (3 messaggi, agg.: 22/08/2021 11:18)
Maschera inserimento dati complessa ( x me ) :D (6 messaggi, agg.: 17/01/2017 23:30)
inserimento dati in base agli spazi vuoti (8 messaggi, agg.: 15/02/2020 08:41)
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 18:40. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com