Insert new column Excel 2002 (xp ) x Excel 2000

Hi

I did the source code of my application with VB and Excel is 2002 (xp), But when I put my application in server
The application no show

Environment of my machine is Excel 2002 and environment of Server (CTRIX) is Excel 2000

figure01 no work
figure02 work fine

My code

Code:

---


  'Insere Coluna
    .Columns("AF:AF").Select
    .Selection.Insert Shift:=xlToRight
     
    'Cabeçalho
  .Range("AF3").Select
  .ActiveCell.FormulaR1C1 = "Data de Expedição"
  'Acrescenta Dados do Array na coluna
  .Range("AF4:AF" & CStr(3 + UBound(Dt_Expedicao))).Value = Application.WorksheetFunction.Transpose(Dt_Expedicao)
  .Range("AF4:AF" & CStr(3 + UBound(Dt_Expedicao))).HorizontalAlignment = xlCenter
  .Range("E1").Select

---

are macros allowed on the server?

Macros in Server are allowed

I installed Excel 2000 in my computer and did not work too, I tried with code VB and using sheet manually and did not work

If I just have a look at the images and go by them then the first thing that I notice is that the column is not being inserted... so the problem actually could be here...

Quote:

---

'Insere Coluna
.Columns("AF:AF").Select
.Selection.Insert Shift:=xlToRight

---

I not sure if that was how a column is inserted in Excel 2000...

Also a suggestion...

avoid using .Select
Directly perform the opreration that you want to do.. For example this

Quote:

---

.Range("AF3").Select
.ActiveCell.FormulaR1C1 = "Data de Expedição"

---

can also be written as

Code:

---

.Range("AF3").FormulaR1C1 = "Data de Expedição"

---

Hope this helps...