Condividi:        

Excel Casella di controllo

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Excel Casella di controllo

Postdi Statix » 03/04/08 23:27

Ciao a tutti,
ho una casella di controllo,nel formato controllo, il valore minino è 0 ,come posso fare per impostare un valore negativo,
cioè impostare valore compreso tra minimo - 1000 e massimo 1000
grazie
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Sponsor
 

Re: Excel Casella di controllo

Postdi Statix » 03/04/08 23:37

chiedo scusa intendevo casella di selezione
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Re: Excel Casella di controllo

Postdi Anthony47 » 03/04/08 23:51

La casella ti da un valore >=0; se devi rappresentare un valore negativo lo potrai calcolare usando non il puro contenuto della cella collegata ma una sua elaborazione. Es, se la cella collegata e' H1, userai nel tuo caso (H1-1000), e come valori limite avrai impostato Min=0 e Max=2000

Ciao.
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Excel Casella di controllo

Postdi Statix » 04/04/08 00:25

Ciao Anthony47, ho provato ma non ci riesco,in rete ho trovato questo

Codice: Seleziona tutto
Creare una nuova cartella di lavoro. 
2. Destro (CONTROL-click) l'area di barra in Microsoft Excel. Scegliere Moduli dal menu per visualizzare la barra Form. 
3. Fare clic sul controllo di selezione sulla barra Form e disegnare la casella di selezione del foglio accanto alla cella A1. 
4. Fare doppio clic sul controllo di selezione per visualizzare la finestra Formato oggetto. Fare clic sul controllo di cui digita tab. un valore minimo 0 E un valore massimo 20, e sceglie OK.

NOTA: Imposta il Massimo su 20 perché la differenza tra il minimo e tra i valori massimi che si desidera utilizzare è 20 (infatti 10-(-10)=20)) 
5. Destro (CONTROL-click) la casella di selezione e il clic Assegna macro. 
6. Scegliere Nuovo nella finestra di dialogo Assegna macro. 
7. Digitare la seguente macro nel modulo:       Const Diff = 10

      Sub Spinner1_Change()
          Range("A1").Value = _
              ActiveSheet.Spinners("Spinner 1").Value - Diff
      End Sub
                  
NOTA: Differenza, la costante, è uguale alla differenza tra 0 e tra il valore minimo che si desidera utilizzare ( infatti 0-(-10) = 10 ). 
8. Attivare il foglio di lavoro che contiene il controllo di selezione. Selezionare la cella A1. Eseguire il test del controllo di selezione facendo clic su esso. Si visualizzano i valori di cella A1 compresi tra --10 e 10.

mi fai un esempio di questo

--------------------------------------------------------------------------------
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Re: Excel Casella di controllo

Postdi gudmund » 04/04/08 09:37

E' un po' grezzo, ma io farei così:
se il range che vuoi ottenere è tra -1000 e +1000, imposti il valore massimo dell pulsante di selezione a 2000 ed il minimo a 0.
Poi, tramite la routine dell'evento "change" scrivi (in una casella, in una cella, in una variabile, ecc.) il risultato -1000
Per esempio, se vuoi il risultato nella cella F7 scriverai:
Codice: Seleziona tutto
Private Sub SpinButton1_Change()
    Range("F7").Value = SpinButton1 - 1000
End Sub

ciao
gudmund
Utente Junior
 
Post: 50
Iscritto il: 21/06/07 14:09

Re: Excel Casella di controllo

Postdi Statix » 04/04/08 10:46

Ciao gudmund
ho provato come hai detto ma non va.
riepilogo il problema
Codice: Seleziona tutto
 in una cella A3 tramite una casella di selezione ,
devo visualizzare un valore da - 1000 a +1000 con incremento 1
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Re: Excel Casella di controllo

Postdi gudmund » 04/04/08 11:31

In Excel ci sono due gruppi di controlli, quelli della barra dei moduli e quelli della barra degli strumenti di controllo.
Confesso la mia ignoranza ma non so qual'è, in pratica, la differenza tra i due gruppi.
Evidentemente tu stai utilizzando quella dei moduli, mentre io utilizzo quella degli strumenti di controllo (che si chiama "Pulsante di selezione" invece che "Casella di selezione".
Se utilizzi il Pulsante di selezione preso dalla barra degli strumenti di controllo, quella la piccola macro che ho scritto funziona perfettamente.
Se poi hai necessità di usare la casella di selezione presa dalla barra dei moduli, purtroppo non so risponderti. Comunque me la studio un po' e ti faccio sapere se ci riesco
ciao
gudmund
Utente Junior
 
Post: 50
Iscritto il: 21/06/07 14:09

Re: Excel Casella di controllo

Postdi Anthony47 » 04/04/08 13:39

Per Statix:
Io la farei nel modo piu' semplice, senza macro, come detto nel post di ieri sera:
-associ alla casella di selezione (disponibile sui tools Moduli) il collegamento a una cella, es H1 (tramite Formato controllo, tab Controllo)
-imposti i valori Min=0 e Max=2000
-in A3 scrivi =H1-1000
Prova ancora, che hai fatto cose piu' complesse...

Per Gudmund: non ho una grande abilita' sugli strumenti di controllo; la differenza principale tra gli strumento "Modulo" e gli analoghi "Strumenti di controllo" e' che i secondi consentono maggiore automazione, con una serie di macro su eventi; li puoi vedere sul vba editor, doppioclick sul nome foglio; di intestazione ti presenta per default "(generale)"/"(dichiarazioni)", ma se hai gia' disegnato sul foglio excel uno strumento di controllo (es lo SpinButton=casella di controllo) puoi scegliere o Worksheet (e accanto gli eventi di foglio) oppure SpinButtonX (con accanto i suoi eventi) oppure altri strumenti di controllo presenti.

Ciao.
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Excel Casella di controllo

Postdi Statix » 04/04/08 20:54

Ciao Anthony47
ho seguito alla lettera le tue indicazioni,tutto ok
risolto anche la procedura della selezione ruota con aggiornamento real time,
per il conteggio avanti/indietro ho applicato la casella di selezione,cosi quando premo la ruota desiderata, il record incrementa o decrementa in base al valore della cella di selezione, per lo stop di superamento dei record ho usato un case select,allego foto.
Codice: Seleziona tutto
Sub Napoli()
Dim Conta As Integer
Conta = Range("C3")

Range("Q9").Value = Range("Trino!B43").Value
Select Case Conta
Case Is > Range("G2")
Range("C3").Value = Range("G2")
Range("U15") = 250
MsgBox "Ultima Estrazione"
Case Is < 1
Range("C3").Value = 1
Range("U15") = 250
MsgBox "Prima estrazione"
End Select

Range("C3").Value = Range("C3").Value + Range("R15")
Range("Trino!B5:F5").Value = Range("D11:H11").Value

Immagine

grazie
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta


Torna a Applicazioni Office Windows


Topic correlati a "Excel Casella di controllo":


Chi c’è in linea

Visitano il forum: Nessuno e 53 ospiti