从文本文件导入excel，样式

我有一个保存文本文件的程序，我想要的是在excel中打开这些文本之前添加一些基本样式。从文本文件导入excel，样式

我的文件通常是这样的：

Title of text 

lorem ipsum dolor sit amet

有什么我可以在这个文本文件，这将使“标题文本的” 大胆在Excel中打开的时候写的？

像HTML标记就

<b>Title of text</b> 

lorem ipsum dolor sit amet

有什么Excel的相似？

来源

2016-11-16 klskl

您可以在excel中添加样式是，但是您是否尝试将格式存储在保存的文本文件中或打开文本的excel文件中？ –

@TimWilkinson在Excel中打开文本文件之前，我希望将格式文件存储在文本文件中，因此第一次在Excel中打开时，标题将为粗体。 – klskl

如果要将工作表保存为“.txt”或其他任何原始文件文本格式，你将无法实现这一点。您将不得不导出为HTML或Word文档，例如保留您添加的任何样式。 –

您可以使用以下代码。此代码将格式化文本的范围为A1:A13。您可以根据需要选择要格式化的范围。只需将此代码复制到Visual Basic编辑器，然后使用运行子按钮运行子。

Sub Macro1() 

Dim str As String 
Dim nBold As Long 
Dim nEndBold As Long 
Dim nChars As Long 
Set Rng = Range("A1:A13") 

For Each cell In Rng 
    str = cell.Text 
    nBold = InStr(str, "<b>") 
    If nBold > 0 Then 
     nEndBold = InStr(str, "</b>") 
    If nEndBold = 0 Then nEndBold = 32767 
     nChars = nEndBold - nBold - 3 
     str = Replace(Replace(str, "<b>", ""), "</b>", "") 
     cell.Value = str 
     cell.Characters(nBold, nChars).Font.Bold = True 
    End If 
Next cell 

End Sub

看看this link了解更多信息。

来源

2016-11-16 11:54:08

从文本文件导入excel，样式

回答

相关问题