In questo articolo, mostreremo come aggiungere il controllo RefEdit nel modulo utente e fare riferimento all’intervallo di celle utilizzandolo.

In questo esempio, abbiamo creato un modulo utente evidenziatore che possiamo utilizzare per evidenziare l’intervallo di celle con il colore giallo.

Abbiamo preso dati campione che consistono in nome e ora di accesso del membro del team.

RawData

Aggiunta di RefEdit in userform

Aggiungi un modulo utente, fai clic sul controllo RefEdit nella casella degli strumenti e seleziona e rilascia il controllo sul modulo utente.

ArrowRefEditControl

Spiegazione logica

Per evidenziare la cella, fare clic sul pulsante Evidenziatore. Si aprirà il modulo utente. Seleziona l’intervallo utilizzando RefEdit. Fare clic sul segno del trattino per selezionare le celle.

ArrowHighlighter

Per selezionare celle adiacenti, premere il tasto Maiusc mentre ci si sposta su un’altra cella. Per selezionare celle non adiacenti, premere il tasto Control mentre si selezionano celle diverse. Le celle selezionate saranno circondate da linee tratteggiate e l’indirizzo della cella apparirà nella casella.

ArrowSelection

Le celle selezionate verranno evidenziate in colore giallo premendo il pulsante Ok. L’evento clic del pulsante Ok contiene il codice VBA per evidenziare le celle selezionate.

ArrowHighlightedCell

Segui sotto per il codice

Option Explicit

Sub running()

UserForm1.Show

End Sub

'Add below code in "Ok" button on userform

Option Explicit

Private Sub CommandButton1_Click()

Dim SelectRange As Range

Dim Address1 As String

On Error GoTo Last

'Get the address from the RefEdit control

Address1 = RefEdit1.Value

'Set the SelectRange Range object to the range specified in the RefEdit control

Set SelectRange = Range(Address1)

'Highlight the selected range in yellow color

SelectRange.Interior.Color = RGB(255, 255, 0)

'Unload the userform.

Unload Me

Last:

End Sub

Se ti è piaciuto questo blog, condividilo con i tuoi amici su Facebook e Facebook.

Ci piacerebbe sentire la tua opinione, facci sapere come possiamo migliorare il nostro lavoro e renderlo migliore per te. Scrivici a [email protected]