(22/08/2021, 22:57)mert_0671 yazdı:(22/08/2021, 22:46)berduş yazdı: aşağıdaki kodu kullanırsanız excele renkli alırsınızTeşekkürler Sayın Berduş yine hızır gibi yetiştiniz sağolun
For x = 2 To sonstr
If InStr(1, Range("c" & x), "<font color=red>") > 0 Then Range("c" & x).Font.Color = vbRed
Range("c" & x) = PlainText(Range("c" & x))
Next x
Sayın berduş bu kod bloğunu orjinal dosyama uygulamaya çalıştığımda hata alıyorum