Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Дата в ячейке Excel из-под VB Добавлено: 20.11.02 11:32  

Автор вопроса:  Alba

Народ! Может, знает кто, как победить проблему.

Есть программа, к-рая делает запросы к базе и (иногда) бросает результаты на лист Excel. В один из столбцов попадает дата - и корежится: одни ячейки автоматом приобретают формат "Общий", тогда в результате получается ДД/ММ/ГГ, другие - формат "Дата" и получается ММ/ДД/ГГ. В организации на одних машинах установлен американский формат даты, на других - европейский (так надо).

По-хорошему надо бы форматировать ячейку, прежде чем в нее писать, но конструкция

Set slct = rng.Select

slct.NumberFormat = "General"

не срабатывает.

Спасибо.

Ответить

  Ответы Всего ответов: 1  

Номер ответа: 1
Автор ответа:
 Petrovich



Вопросов: 9
Ответов: 84
 Профиль | | #1 Добавлено: 20.11.02 15:58

Ты попробуй вместо общего, который и тащит за собой преобразование даты в тот формат, который установлен на этой машине, "в лоб" указать ему, какой формат ты хочешь видеть в ячейке. К примеру:

Option Explicit

Private Sub Form_Load()
    Dim xl As New Excel.Application
    xl.Visible = True
    Dim wb As Excel.Workbook
    Dim ws As Excel.Worksheet
    Dim rg As Excel.Range
    Set wb = xl.Workbooks.Add
    Set ws = wb.ActiveSheet
    Set rg = ws.Range("A1")
    rg.NumberFormat = "dd.mm.yyyy"
    rg.Value = Date
End Sub

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам