Subscript vs. Superscript conflict
问题 Background: I'm trying to write a module to concatenate strings with it's formatting. Therefor I'm looking in all Font properties that could matter, including Subscript and Superscript . Sample Data: Imagine in A1 : Sample Code: Sub Test() With Sheet1.Range("B1") .Value = .Offset(0, -1).Value For x = 1 To .Characters.Count .Characters(x, 1).Font.Subscript = .Offset(0, -1).Characters(x, 1).Font.Subscript .Characters(x, 1).Font.Superscript = .Offset(0, -1).Characters(x, 1).Font.Superscript Next