5 metodi per applicare rapidamente il colore di riempimento di una cella della tabella all'intera riga, colonna o tabella

In questo articolo, ti offriremo cinque metodi per applicare rapidamente il colore di riempimento di una cella di tabella all'intera riga, colonna o tabella.

Potresti notare che quando copi in una cella di tabella in Word, ottieni solo il contenuto della cella ma mai il colore di riempimento. Pertanto, vogliamo mostrarti cinque soluzioni alternative per risolvere questo problema.    

Metodo 1: ottenere manualmente il valore RGB della cella della tabella

1. Prima di tutto, seleziona la cella di cui devi ottenere il colore di riempimento.
2. Quindi fai clic sulla scheda "Progettazione".
3. Trova il comando sotto "Ombreggiatura" e fai clic sul pulsante a discesa su quel comando.
4. Nel menu scegli "Bordi e ombreggiatura" per aprire la finestra di dialogo con lo stesso nome.
5. Successivamente nella casella aperta, fai clic sulla scheda "Ombreggiatura".
6. Vai al campo "Riempi" e fai clic sul pulsante a discesa.
7. E seleziona "Altri colori" per aprire la casella "Colori".
8. Scegli "RGB" per il campo "Modello colore". Ottieni il valore RGB di seguito.
9. Quindi chiudete tutte le finestre e posizionate il cursore all'interno della cella di destinazione. In alternativa, potete selezionare più celle, righe, colonne o persino l'intera tabella.
10. E fai clic sul pulsante a discesa sul comando "Ombreggiatura" per selezionare "Altri colori".
11. Immettere il valore RGB nella scheda "Personalizzato" e fare clic su "OK".

Metodo 2: aprire il riquadro "Reveal Formatting".

L'idea è simile: si tratta di ottenere il valore RGB e poi applicarlo alle celle, righe, colonne o all'intera tabella di destinazione.

1. Innanzitutto, posiziona il puntatore di inserimento all'interno della cella piena.
2. Quindi premi "Maiusc + F1" per aprire il riquadro "Reveal Formatting". E sarai in grado di vedere il valore RGB della cella nella sezione "Ombreggiatura".
3. Segui i passaggi da 9 a 11 nel metodo 1.

Metodo 3: applica il colore di riempimento di una cella all'intera tabella tramite VBA

Come suggerisce il sottotitolo, ecco come unire l'intera tavola in un unico colore.

1. Per cominciare, posiziona il puntatore di inserimento all'interno di una cella colorata.
2. Premi "Alt + F11" per attivare l'editor VBA.
3. Quindi fai clic sul progetto "Normale" e fai clic sulla scheda "Inserisci".
4. Quindi scegli "Modulo" in quel menu.
5. Aprilo facendo doppio clic.
6. E incolla i seguenti codici lì:

Sub ApplyColorOfOneCellToEntireTable()
  Dim nRowIndex As Integer
  Dim nColumnIndex As Integer
  Dim nCellForeColor As Long
  Dim nCellBackColor As Long
 
  If Selection.Information(wdWithInTable) = True Then
    nRowIndex = Selection.Cells(1).RowIndex
    nColumnIndex = Selection.Cells(1).ColumnIndex
  Else
    MsgBox ("Please put your cursor inside a cell.")
    Exit Sub
  End If
  With Selection.Tables(1)
    nCellBackColor = .Cell(nRowIndex, nColumnIndex).Shading.BackgroundPatternColor
    nCellForeColor = .Cell(nRowIndex, nColumnIndex).Shading.ForegroundPatternColor
    .Shading.BackgroundPatternColor = nCellBackColor
    .Shading.ForegroundPatternColor = nCellForeColor
  End With
End Sub

7. Infine, fai clic su "Esegui" o premi "F5".

Metodo 4: applica il colore di riempimento di una cella all'intera riga tramite VBA

1. All'inizio, posiziona il cursore all'interno di una cella.
2. Quindi installa ed esegui una macro seguendo esattamente gli stessi passaggi nel metodo 3.
3. Quindi sostituisci i codici sopra con questi:

Sub ApplyColorOfOneCellToEntireRow()
  Dim nRowIndex As Integer
  Dim nCellForeColor As Long
  Dim nCellBackColor As Long
 
  If Selection.Information(wdWithInTable) = True Then
    nRowIndex = Selection.Cells(1).RowIndex
    nCellBackColor = Selection.Cells(1).Shading.BackgroundPatternColor
    nCellForeColor = Selection.Cells(1).Shading.ForegroundPatternColor
  Else
    MsgBox ("Please put your cursor inside a cell.")
    Exit Sub
  End If
  With Selection.Tables(1).Rows(nRowIndex).Shading
    .BackgroundPatternColor = nCellBackColor
    .ForegroundPatternColor = nCellForeColor
  End With
End Sub

Metodo 5: applica il colore di riempimento di una cella all'intera colonna tramite VBA

1. Probabilmente, posiziona prima il cursore all'interno di una cella.
2. Quindi installa ed esegui correttamente una macro.
3. Sostituisci la macro con questa:

Sub ApplyColorOfOneCellToEntireColumn()
  Dim nColumnIndex As Integer
  Dim nCellForeColor As Long
  Dim nCellBackColor As Long
 
  If Selection.Information(wdWithInTable) = True Then
    nColumnIndex = Selection.Cells(1).ColumnIndex
    nCellBackColor = Selection.Cells(1).Shading.BackgroundPatternColor
    nCellForeColor = Selection.Cells(1).Shading.ForegroundPatternColor
  Else
    MsgBox ("Please put your cursor inside a cell.")
    Exit Sub
  End If
  With Selection.Tables(1).Columns(nColumnIndex).Shading
    .BackgroundPatternColor = nCellBackColor
    .ForegroundPatternColor = nCellForeColor
  End With
End Sub

Gestisci i problemi di Word

Ci sono e ci saranno sempre problemi nel processo di utilizzo di Word. Quindi è abbastanza necessario imparare il trucco giusto per affrontare tutti questi fastidiosi problemi. Una delle misure che devi prendere è entrare in possesso di a Correzione della parola strumento in anticipo. Quindi non sarai preso dal panico una volta che un documento si corrompe.

Introduzione dell'autore:

Vera Chen è un'esperta di recupero dati in DataNumen, Inc., che è il leader mondiale nelle tecnologie di recupero dati, tra cui recuperare eccellere and pdf riparare prodotti software. Per maggiori informazioni visita www.datanumen.com