1 Konuyu açan smentes

  • smentes
  • smentes
  • Uzman Üye
  • Offline
  • Yer: Denizli
  • Kayıt Tarihi: 01.09.2006
  • İleti: 389

Konu: Excelde Hücre Uzunluğu

dosyaadix = "dosyax"
Select tablex
Export To &dosyaadix Type Xl5 fields kod1x,kod2x,kod3x
oExcel = Createobject('Excel.Application')
oExcel.Workbooks.Open(FullPath(dosyaadix))
oExcel.Cells(1, 1).value="BAŞLIK1"
oExcel.Cells(1, 2).value="BAŞLIK2xxx"
oExcel.Cells(1, 3).value="BAŞLIK3xxxxxxx"
oExcel.Visible = .T.

Sorum: Buradaki Başlık1, Başlık2xxx ve Başlık3xxxxxxx hücrelerinin genişliğini başlıktaki karakterlerin tümünü gösterecek şekilde nasıl ayarlayabilirim?  Örnek: Otomatik olarak başlık1 hücresinin genişliği : 8.43, başlık2xxx de 8.43 geliyor. Başlık2xxx hücresinin genişliğini  10.86 olarak kodla yapabilir miyim?

2 Cevaplayan ctapan

  • ctapan
  • ctapan
  • Uzman Üye
  • Offline
  • Yer: Antalya
  • Kayıt Tarihi: 07.10.2006
  • İleti: 141

Re: Excelde Hücre Uzunluğu

oExcel.Cells(1, 3).ColumnWidth = 10.86

Bütün kolonları otomatik ayarlamak içinde
oExcel.Cells.Select
oExcel.Cells.EntireColumn.AutoFit

ctapan's Website

3 Cevaplayan smentes

  • smentes
  • smentes
  • Uzman Üye
  • Offline
  • Yer: Denizli
  • Kayıt Tarihi: 01.09.2006
  • İleti: 389

Re: Excelde Hücre Uzunluğu

Cemal Bey teşekkürler.
Peki burada başlıktaki kolon arka rengi, başlık rengi ve fontlarını da ayarlamak istesem?

4 Cevaplayan ctapan

  • ctapan
  • ctapan
  • Uzman Üye
  • Offline
  • Yer: Antalya
  • Kayıt Tarihi: 07.10.2006
  • İleti: 141

Re: Excelde Hücre Uzunluğu

Visual Fox Pro
loExcel.Cells(1, 3).Select 

WITH loexcel.Selection.Font

     .Name = "Times New Roman"

     .Bold = .t.

     .Italic = .t.

     .Size = 12

     .Strikethrough = .f.

     .Superscript = .f.

     .Subscript = .f.

     .OutlineFont = .f.

     .Shadow = .f.

     .Underline = 2

     .ColorIndex = 3

EndWith

loexcel.Selection.Interior.ColorIndex = 6

Not: Underline = 2 yazan yerdeki 2 nin manası xlUnderlineStyleSingle . bunların vfp karşılıklarını veren bir dosyayıda mail ile gönderdim.

ctapan's Website

5 Cevaplayan smentes

  • smentes
  • smentes
  • Uzman Üye
  • Offline
  • Yer: Denizli
  • Kayıt Tarihi: 01.09.2006
  • İleti: 389

Re: Excelde Hücre Uzunluğu

Tekrar teşekkürler.