Come mettere in grassetto solo la prima riga o la prima parola nella cella in Excel?
In un foglio di lavoro Excel, potrebbero esserci molte celle contenenti più righe che sono state divise con i tasti Alt + Invio. In alcuni casi, potrebbe essere necessario mettere in grassetto solo la prima riga di queste celle. O solo in grassetto la prima parola per renderlo eccezionale nelle celle. Questo articolo mostra due metodi per ottenerlo nei dettagli.
Grassetto solo la prima riga nella cella con codice VBA Grassetto solo la prima parola nella cella con codice VBA
Grassetto solo la prima riga nella cella con codice VBA
Il seguente codice VBA può aiutarti a mettere rapidamente in grassetto solo la prima riga nelle celle selezionate. Si prega di fare quanto segue.
1. Stampa altro + F11 tasti contemporaneamente per aprire il file Microsoft Visual Basic, Applications Edition finestra.
2. Nel Microsoft Visual Basic, Applications Edition finestra, fare clic inserire > Moduli. Quindi copia e incolla il codice VBA sottostante nella finestra del modulo.
Codice VBA: grassetto solo la prima riga nelle celle
Option Explicit
Sub BoldFirstLine()
Dim xRng As Range, xCell As Range
Dim xFirstRow As String
On Error Resume Next
Set xRng = Application.InputBox("Please select range:", "Kutools for", Selection.Address, , , , , 8)
If xRng Is Nothing Then Exit Sub
On Error Resume Next
For Each xCell In xRng
With xCell
.Characters(1, InStr(.Value, Chr(10))).Font.Bold = True
End With
Next
End Sub
3. premi il F5 chiave per eseguire il codice. Poi un Kutools for Excel si apre la finestra di dialogo, selezionare l'intervallo con la prima riga necessaria per renderlo in grassetto, quindi fare clic su OK pulsante.
Quindi puoi vedere tutte le prime righe delle celle selezionate in grassetto immediatamente come mostrato nell'immagine sottostante.
Grassetto solo la prima parola nella cella con codice VBA
Come mostrato nell'immagine sottostante, a volte è necessario mettere in grassetto la prima parola solo nell'intervallo A2: A4 in Excel. Puoi ottenerlo come segue passo dopo passo.
1. Stampa altro + F11 tasti contemporaneamente per aprire il file Microsoft Visual Basic, Applications Edition finestra.
2. Nel Microsoft Visual Basic, Applications Edition finestra, fare clic inserire > Moduli. Quindi copia e incolla il codice VBA sottostante nella finestra del modulo.
Codice VBA: in grassetto solo la prima parola nelle celle
Sub boldtext()
Dim xRng As Range, xCell As Range
On Error Resume Next
Set xRng = Application.InputBox("Please select range:", "Kutools fro Excel", Selection.Address, , , , , 8)
If xRng Is Nothing Then Exit Sub
On Error Resume Next
For Each xCell In xRng
If xCell.Value <> "" Then
xCell.Characters(1, InStr(1, xCell.Value, " ") - 1).Font.Bold = True
End If
Next
End Sub
3. premi il F5 chiave per eseguire il codice. Nel spuntare Kutools for Excel finestra di dialogo, selezionare l'intervallo in cui si desidera rendere la prima parola in grassetto, quindi premere il tasto OK pulsante. Vedi screenshot:
Quindi puoi vedere tutte le prime parole delle celle selezionate in grassetto immediatamente come mostrato nell'immagine sottostante.
Articolo correlato:
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!