Mettez en surbrillance les cellules avec un mot mal orthographié, Excel VBA
Sub cellulesmotorthographie() Dim rng As Range For Each rng In ActiveSheet.UsedRange If Not Application.CheckSpelling(word:=rng.Text) Then rng.Style = « Bad » End I f Next rng End Sub
mars 29, 2022
Aucun commentaire