2012-03-05 11 views
2

SQL SelectからExcelにレコードを抽出するアプリケーションを作成しました。
保存する前にExcelの列の数値書式を変更したいと考えています。私は列の型に応じた数の形式を変更したいと思い、それにExcelオブジェクトの構文。番号の書式変更

Excel_Sheet.Cells[i + j,k] = s_col 

にデータを書き込み、その後EXCEL OLEオブジェクトを作りました。私はすでに列型を取得する方法を知っていますが、数値書式を変更することはできません。

私はこれらを使用:ヘッダは太字にし、自動調整を使用して、データに応じて、幅を変更するには..私はインターネットで見つけたすべて:

Excel_Sheet.Range(s_into_row + String(j) + ":" +s_into_col + String(j)).Select 
Excel_Obj.Selection.Font.Bold = True 

Excel_Sheet.Range("A"+String(j)+":A"+String(j)).Select 
Excel_Sheet.Columns(s_into_row + ":" + s_into_col).EntireColumn.AutoFit 

私は、PowerBuilder

+1

私はPowerbuilderを使っていませんが、Excel_Sheet.Columns(s_into_row).NumberFormat = "0.00" ' –

+0

のようなものを試してみました。答えがありがとう、私は鉛は無関係ですが、私はそれを言及しようとしたことを知っている。ありがとうございました。どのように私は正しい答えを記入しますか:Dありがとうございます – Sid

+1

@SiddharthRout:*あなたがSidがそれを受け入れるように回答を投稿することができます。ソリューションへのクレジットはあなたに属しています:) – JMax

答えて

1

シドを使用しています、私は、PowerBuilderで働いていないが、あなたはHTH

Excel_Sheet.Columns(s_into_row).NumberFormat = "0.00"

のようなものを試してみました

シド

2

私はこれに似たプロジェクトにいくつかのコードを持っている:ls_coltypeが列「(」とタイプし、除去後のすべてです

choose case lower(ls_coltype) 
    case "char" 
     lole_Excel.Selection.NumberFormat = "@" 
    case "date" 
     lole_Excel.Selection.NumberFormat = "mm/dd/yyyy" 
    case "int", "long", "ulong" 
     lole_Excel.Selection.NumberFormat = "0" 
    case "time" 
     lole_Excel.Selection.NumberFormat = "h:mm AM/PM" 
    ... 
end choose 

関連する問題