7 moduri de a remedia eroarea Blue Screen of Death (BSOD) în Windows 10
Luptă cu eroarea Blue Screen of Death (BSOD) în Windows 10. Obțineți remedieri de depanare pentru a rezolva această eroare cu ușurință.
În acest tutorial vom învăța cum să folosim Visual Basic pentru aplicații (VBA) pentru a modifica dimensiunea și stilul textului într-o celulă Excel pe baza conținutului celulei. Acest tutorial se aplică pentru Excel 365, 2021, 2019 și 2016.
Preliminarii
Dacă sunteți nou în dezvoltarea Excel VBA, vă voi recomanda ca, înainte de a parcurge tutorialul, să vă uitați la primul nostru macro Excel VBA.
Înainte de a începe codarea, ar trebui să activați fila de dezvoltator pe Excel în Panglică, deoarece altfel nu veți putea accesa Editorul Visual Basic.
Modificați proprietățile textului celulei Excel cu VBA
Definiți foaia de calcul
Vom începe prin a defini o foaie de calcul Excel pe care o vom folosi ca exemplu. Simțiți-vă liber să îl utilizați pentru a urma acest tutorial.
Utilizați proprietatea Cell.Font VBA pentru a schimba culoarea și stilul fontului
Sub Color_Cell_Text_Condition()
Dim MyCell As Range
Dim StatValue As String
Dim StatusRange As Range
Set StatusRange = Range("Completion_Status")
'loop through all cells in the range
For Each MyCell In StatusRange
StatValue = MyCell.Value
'modify the cell text values as needed.
Select Case StatValue
'green
Case "Progressing"
With MyCell.Font
.Color = RGB(0, 255, 0)
.Size = 14
.Bold = True
End With
'orange
Case "Pending Feedback"
With MyCell.Font
.Color = RGB(255, 141, 0)
.Size = 14
.Bold = True
End With
'red
Case "Stuck"
With MyCell.Font
.Color = RGB(255, 0, 0)
.Size = 14
.Bold = True
End With
End Select
Next MyCell
End Sub
Accesați macrocomanda VBA
Excel oferă posibilitatea de a crea „Stiluri” pentru celule. Stilurile pot fi găsite în Panglica Acasă > Stiluri:
Stilurile vă permit să salvați formatarea dorită a celulelor. Apoi atribuiți acel stil unei celule noi și toată formatarea celulei este aplicată instantaneu. Inclusiv dimensiunea fontului, culoarea celulei, starea protecției celulelor și orice altceva disponibil din meniul Formatare celule:
Personal, pentru multe dintre modelele la care lucrez, de obicei creez un stil de celulă „Intrare”:
Interval("a1").Stil = "Intrare"
Folosind stiluri, puteți identifica cu ușurință tipurile de celule în foaia de lucru. Exemplul de mai jos va trece prin toate celulele din foaia de lucru și va schimba orice celulă cu Style = „Input” în „InputLocked”:
Dim Cell ca interval
Pentru fiecare celulă din ActiveSheet.Cells
Dacă Cell.Style = "Input" apoi Cell.Style = "InputLocked"
Încheiați dacă
Celula următoare
Luptă cu eroarea Blue Screen of Death (BSOD) în Windows 10. Obțineți remedieri de depanare pentru a rezolva această eroare cu ușurință.
Dacă doriți să creați etichete în aplicația Gmail, acest ghid vă oferă soluția. Aflati cum sa faceti acest lucru atât pe telefon, cât și pe desktop.
Îmbunătățiți-vă documentele cu un chenar de pagină personalizat în Word. Află cum să adăugați și să personalizezi chenarul.
Dacă Xbox-ul dvs. nu se va conecta la Wi-Fi, urmăriți soluțiile furnizate în acest articol pentru a vă conecta Xbox și a continua să jucați.
Dacă PS4 se oprește de la sine, urmați soluțiile noastre eficiente pentru a remedia problema rapid și ușor.
Aflați cele mai bune soluții pentru a remedia eroarea „microfonul este dezactivat de setările sistemului” pe Google Meet, Zoom și Hangouts.
Descoperiți modalitățile simple și eficiente de a scrie fracții în Google Docs folosind caractere speciale și echivalente automate.
Remedierea eroarei Google ReCaptcha „Eroare pentru proprietarul site-ului: tip cheie invalid” prin soluții eficiente și actualizate.
Setările de calibrare a culorilor încorporate în Windows 10 vă ajută să îmbunătățiți acuratețea culorii monitoarelor dvs. Acest ghid detaliat vă arată cum să găsiți și să configurați aceste setări.
Conectarea la rețeaua PlayStation a eșuat atunci când vă conectați la PS4, apoi urmați remedieri precum actualizarea software-ului sistemului PSN, modificarea setărilor DNS...