'Option Strict on Problem:
xlApp.Cells(intZeileStart - 1, col + intSpalteStart).value = _
  strdgv.Columns.Item(col).HeaderText
 
'Option Strict on gelöst: .value weglassen
xlApp.Cells(intZeileStart - 1, col + intSpalteStart) = _
  strdgv.Columns.Item(col).HeaderText

'Beispiel:
'Führt zu einem Fehler bei Option Strict on (Option Strict On lässt spätes 
' Binden nicht zu):
Dim xlApp = CreateObject("Excel.Application")
 
'CType löst das Problem bei Option Strict on:
Dim xlApp = CType(CreateObject("Excel.Application"), Excel.Application)

'Fehler bei Option Strict On:
xlApp.Cells(intZeileStart - 1, col + intSpalteStart).interior.color = RGB(227, _
  247, 255) 'hellblau

---
Verwendete Programmversionen:
Windows 7 64 bit sowie Windows 10 Prof.
Visual Studio 13 Professional
Microsoft Prof. 2010 (= Version 14)