Telefonino.net network
 
| HOMEPAGE | INDICE FORUM | REGOLAMENTO | ::. NEI PREFERITI .:: | RSS Forum | RSS News | NEWS web | NEWS software |
| PUBBLICITA' | | ARTICOLI | WIN XP | VISTA | WIN 7 | REGISTRI | SOFTWARE | MANUALI | RECENSIONI | LINUX | HUMOR | HARDWARE | DOWNLOAD | | CERCA nel FORUM » |

Torna indietro   WinTricks Forum > Software > Office suite

Notices

Rispondi
 
Strumenti discussione
Vecchio 31-03-2016, 20.59.25   #1
DPSOS
Newbie
 
Registrato: 05-01-2016
Messaggi: 14
DPSOS promette bene
Contare quante volte cambia un valore

Ciao a tutti
ho una tabella nella quale la colonna "D" contiene un valore data che viene immessa manualmente dall'operatore, io avrei la necessita di sapere quante volte viene cambiato questo valore.
Da tenere presente che si tratta di una tabella quindi le righe da controllare sono tutte della colonna "D" a iniziare dalla riga 13 in poi.
Una volta fatto questo vorrei bloccare la cella "Dx" che ha superato "2" variazioni.
Bloccare nel senso che l'operatore non possa più modificare il valore di quella cella.
In rete non ho trovato nulla che faccia al caso mio, potete aiutarmi per favore?

Grazie
DPSOS non è collegato   Rispondi citando
Vecchio 31-03-2016, 22.26.16   #2
Alexsandra
Senior Member
WT Expert
 
L'avatar di Alexsandra
 
Registrato: 19-05-2007
Loc.: Verona
Messaggi: 1.302
Alexsandra è conosciuto da tuttiAlexsandra è conosciuto da tuttiAlexsandra è conosciuto da tuttiAlexsandra è conosciuto da tuttiAlexsandra è conosciuto da tutti
Rif: Contare quante volte cambia un valore

+ o - di quante righe parliamo?
inoltre, si può usare una colonna di appoggio?
cioè si può scrivere nella colonna Z11, Z12 etc. quando viene cambiato il valore di D11, D12 etc..
___________________________________

- Il primo fondamento della sicurezza non e' la tecnologia, ma l'attitudine mentale -
Alexsandra non è collegato   Rispondi citando
Vecchio 03-04-2016, 23.25.26   #3
DPSOS
Newbie
 
Registrato: 05-01-2016
Messaggi: 14
DPSOS promette bene
Rif: Contare quante volte cambia un valore

Parliamo di 500 righe circa e si ci possono essere colonne di appoggio.
Tu a cosa avevi pensato per la soluzione?
DPSOS non è collegato   Rispondi citando
Vecchio 04-04-2016, 00.05.18   #4
Alexsandra
Senior Member
WT Expert
 
L'avatar di Alexsandra
 
Registrato: 19-05-2007
Loc.: Verona
Messaggi: 1.302
Alexsandra è conosciuto da tuttiAlexsandra è conosciuto da tuttiAlexsandra è conosciuto da tuttiAlexsandra è conosciuto da tuttiAlexsandra è conosciuto da tutti
Rif: Contare quante volte cambia un valore

si potrebbe fare una cosa del genere.

quando viene modificata una cella nella colonna D nell'intervallo D13:D513 andiamo a scrivere un flag nella colonna Zx.
per esempio se cambi un valore nella cella D50, scriviamo un flag, (che può essere il numero 1) nella cella Z50

quando nella cella Z50 troviamo il valore 2 blocchiamo la cella D50

per fare una macro sarebbe cosa utile vedere quale colonna possiamo usare per calcolare l'ultima riga scritta nel foglio, poi scriviamo la macro
___________________________________

- Il primo fondamento della sicurezza non e' la tecnologia, ma l'attitudine mentale -
Alexsandra non è collegato   Rispondi citando
Vecchio 05-04-2016, 14.10.05   #5
DPSOS
Newbie
 
Registrato: 05-01-2016
Messaggi: 14
DPSOS promette bene
Rif: Contare quante volte cambia un valore

dalla colonna Z in poi sono tutte libere
DPSOS non è collegato   Rispondi citando
Vecchio 05-04-2016, 21.40.55   #6
Alexsandra
Senior Member
WT Expert
 
L'avatar di Alexsandra
 
Registrato: 19-05-2007
Loc.: Verona
Messaggi: 1.302
Alexsandra è conosciuto da tuttiAlexsandra è conosciuto da tuttiAlexsandra è conosciuto da tuttiAlexsandra è conosciuto da tuttiAlexsandra è conosciuto da tutti
Rif: Contare quante volte cambia un valore

ho provato con i colori.
alla 1° modifica il colore di sfondo della cella diventa giallo, alla seconda modifica diventa cyano e dopo non puoi più modificare

copia il codice sotto riportato nel foglio interessato

Codice:
Private Sub Worksheet_Change(ByVal Target As Range)

With Target
If .Column = 4 And .Interior.ColorIndex = xlNone Then
    .Interior.ColorIndex = 6
    ElseIf .Column = 4 And .Interior.ColorIndex = 6 Then
    .Interior.ColorIndex = 8
    End If
       End With
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   
    With Target
        If Target.Column = 4 Then
            rig = Target.Row
            If Range("D" & rig).Interior.ColorIndex = 8 Then
                MsgBox "Non puoi modificare la cella."
                Range("D1").Select
            End If
        End If
    End With
  End Sub
___________________________________

- Il primo fondamento della sicurezza non e' la tecnologia, ma l'attitudine mentale -
Alexsandra non è collegato   Rispondi citando
Vecchio 09-04-2016, 12.59.50   #7
DPSOS
Newbie
 
Registrato: 05-01-2016
Messaggi: 14
DPSOS promette bene
Rif: Contare quante volte cambia un valore

purtroppo ho omesso di dirti che il file in questione è già un pò elaborato e
quindi ha già diverse macro e specifiche formattazioni con colori specifici, in
effetti le macro che mi hai fatto vanno in conflitto con le altre macro.
Ora devo capire come farle funzionare.
Però non si riusciva con una colonna di appoggio a contare quante volta cambia
il valore della cella della colonna "D"?
DPSOS non è collegato   Rispondi citando
Vecchio 09-04-2016, 22.56.21   #8
Alexsandra
Senior Member
WT Expert
 
L'avatar di Alexsandra
 
Registrato: 19-05-2007
Loc.: Verona
Messaggi: 1.302
Alexsandra è conosciuto da tuttiAlexsandra è conosciuto da tuttiAlexsandra è conosciuto da tuttiAlexsandra è conosciuto da tuttiAlexsandra è conosciuto da tutti
Rif: Contare quante volte cambia un valore

si possiamo usare una colonna di appoggio
___________________________________

- Il primo fondamento della sicurezza non e' la tecnologia, ma l'attitudine mentale -
Alexsandra non è collegato   Rispondi citando
Vecchio 09-04-2016, 23.50.52   #9
Alexsandra
Senior Member
WT Expert
 
L'avatar di Alexsandra
 
Registrato: 19-05-2007
Loc.: Verona
Messaggi: 1.302
Alexsandra è conosciuto da tuttiAlexsandra è conosciuto da tuttiAlexsandra è conosciuto da tuttiAlexsandra è conosciuto da tuttiAlexsandra è conosciuto da tutti
Rif: Contare quante volte cambia un valore

prova così
Codice:
Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range("D:D")) Is Nothing Then
rg = Target.Row
If Target.Value <> "" And Range("Z" & rg) = "" Then
Range("Z" & rg) = 1
ElseIf Target.Value <> "" And Range("Z" & rg) = 1 Then
Range("Z" & rg) = 2
            Else
    End If
    End If
Cancel = True

End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   
    With Target
        If Target.Column = 4 Then
            rig = Target.Row
            If Range("Z" & rig).Value = 2 Then
                MsgBox "Non puoi modificare la cella."
                Range("D1").Select
            End If
        End If
    End With
  End Sub
___________________________________

- Il primo fondamento della sicurezza non e' la tecnologia, ma l'attitudine mentale -
Alexsandra non è collegato   Rispondi citando
Rispondi


Utenti attualmente attivi che stanno leggendo questa discussione: 1 (0 utenti e 1 ospiti)
 
Strumenti discussione

Regole di scrittura
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is ON
Gli smilies sono ON
[IMG] è ON
Il codice HTML è OFF

Vai al forum

Discussioni simili
Discussione Autore discussione Forum Risposte Ultimo messaggio
Corso VBA Alexsandra Guide 85 16-11-2016 12.11.51
Barzellette 2009/2010 Sbavi Chiacchiere in libertà 638 17-10-2012 19.55.18
Humor, differenze fra uomini e donne Feintool Chiacchiere in libertà 14 11-11-2005 21.03.32

Orario GMT +2. Ora sono le: 22.32.49.


E' vietata la riproduzione, anche solo in parte, di contenuti e grafica.
Copyright © 1999-2017 Edizioni Master S.p.A. p.iva: 02105820787 • Tutti i diritti sono riservati
L'editore NON si assume nessuna responsabilità dei contenuti pubblicati sul forum in quanto redatti direttamente dagli utenti.
Questi ultimi sono responsabili dei contenuti da loro riportati nelle discussioni del forum
Powered by vBulletin - 2010 Copyright © Jelsoft Enterprises Limited.