, f.eks. til at filtrere celler i henhold til celler med fede typer stil:,,,,,, hvis du kan identificere sig med, om i er dristige eller ej, opgave er let at arkivar cellerne med modige formatering.det andet er at identificere bod makro - celler, trin 1: her, ctrl +, f11, nøgler til at åbne microsoft visual basic anvendelse vindue.,, trin 2: tryk, indsæt > >, modul, og pasta følgende vba kode på det nye modul vindue:,,, funktion isbold (rcell som interval),,, isbold = rcell. skrifttype. fed,,, funktion, trin 3: i den celle, d2, ind i formlen, = isbold (b2), og tryk ind, nøgle.hvis den snor i celle b1 er dristige, det vender tilbage, er rigtigt, i celle d2, ellers, falske,.,,,,, trin 4: angiv den vifte af d2 - d17, og tryk, hjem, > >, fyld, > >, ned, kopi af formlen til andre celler i området.,, løntrin 5: tryk, filter, knap under, data, tab.,, trin 6: tryk pilen knap, bortset fra afsnit i kolonne d, trin 7: uncheck, udvælge, post og tjek, sandt, punkt på dagsordenen.se følgende skærm skød:,,,,, nu filtre celler i kolonne b, og som er dristige, og skjule andre, se følgende skærm skød:,,,,,,,, vba makro - 2:,,, det andet makro giver dig mulighed for at filtrere de dristige celler i en kolonne direkte.,, trin 1: angiv afstand, som du vil - fra dristige.In this case select the range of B2:B17.,,,Note:, You cannot select the header cell at the top of filtered column, says Cell B1.,,Step 2: Hold down the ,Ctrl, + ,F11, keys to open the Microsoft Visual Basic for Application window.,,Step 3: Click the ,Insert, >> ,Module,, and paste the following VBA code on the new Module window:,,,Sub FilterBold(),,,Dim cell As Range,,,For Each cell In Selection,,,If cell.Font.Bold = False Then,,,cell.EntireRow.Hidden = True,,,End If,,,Next cell,,,End Sub,,,Step 4: Press the ,F5 ,key to run this macro.,,Now you will get the filter result same as the figure we showed you in VBA Macro 1.,,,,,VBA Macro 3:,,,This VBA macro also allows you to filter column by bold directly.,,Step 1: Hold down the ,Ctrl, + ,F11, keys to open the Microsoft Visual Basic for Application window.,,Step 2: Click the ,Insert, >> ,Module,, and paste the following VBA code on the new Module window:,,,Sub FilterBold(),,,Dim myRange As Range,,,Set myRange = Application.InputBox(Prompt:="Please Select a Range", Title:="InputBox Method", Type:=8),,,myRange.Select,,,Application.ScreenUpdating = False,,,For Each myRange In Selection,,,If myRange.Font.Bold = False Then,,,myRange.EntireRow.Hidden = True,,,End If,,,Next myRange,,,Application.ScreenUpdating = True,,,End Sub,,,Step 3: Press the ,F5, key to run this macro.,,Step 4: InputBox Method dialog box pops up, and please specify the filter range, says B1:B17 in this case, and click ,OK,.,,,,,Now it hides all rows wslange celler i kolonne b ikke er modige og filter kun celler er dristige.se filtrering resultat.,, kutools for excel, med mere end 120 handy excel - tilføje ins, gratis prøve uden begrænsning i 60 dage. gå til at downloade gratis 60 dayspurchase, brug /mycommerce,,