Данные с разделителями табуляции в ячейке Excel - PullRequest
0 голосов
/ 26 января 2012

Я хочу построить строку с разделителями табуляции и вставить ее в ячейку "A1".По какой-то причине он не определяет разделитель табуляции.Вот мой код:

Worksheets("Sheet1").Range("A1").Value = Join(Application.WorksheetFunction.Transpose(Worksheets("Sheet1").Range("B1:B11")), Chr(9))

Я даже попробовал "vbTab" вместо "Chr (9)", но я все еще не вижу никаких вкладок в строке.Это вставка строки без какого-либо разделителя.

Заранее спасибо

Ответы [ 2 ]

1 голос
/ 26 января 2012

Excel не может визуально отображать вкладки в ячейке.

Что касается Excel, вкладка означает переход к следующей ячейке. Если вы скопируете строку с вкладкой и вставите результат в Excel, текст будет помещен перед вкладкой в ​​выбранной вами ячейке, а текст после вкладки - в следующей.

Если вам просто нужна вкладка, вы можете быть уверены, что она есть. Если вы хотите, чтобы он отображался визуально, измените свой вопрос, чтобы объяснить, что вы пытаетесь сделать.

1 голос
/ 26 января 2012

Вкладки есть, но не отображаются.Попробуйте

Dim stg As String
Dim pos As Long

Worksheets("Sheet1").Range("A1").Value = Join(Application.WorksheetFunction. _
                        transpose(Worksheets("Sheet1").Range("B1:B11")), Chr(9))

stg = Worksheets("Sheet1").Range("A1").Value

For pos = 1 To Len(stg)
  Debug.Print Asc(Mid(stg, pos, 1)) & " ";
Next
Debug.Print

. В Immediate Window будут показаны значения ASCII ваших строк, разделенных на девять.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...