Hey i'm back from a student holiday Thx for all the answers i will vote 4 them... I posted the wrong code snippet here is the code that i wanted to post : Imports Microsoft.Office.Interop Try Dim oApp As New Excel.Application() Dim oBook As Excel.Workbook = oApp.Workbooks.Add Dim oSheet As Excel.Worksheet = oApp.ActiveSheet chartRange = oSheet.range("A20", "G20") oSheet.Range("A20").Value = "blabla" chartRange.BorderAround(Excel.XlLineStyle.xlContinuous, \_ Excel.XlBorderWeight.xlMedium, Excel.XlColorIndex. \_ xlColorIndexAutomatic, Excel.XlColorIndex.xlColorIndexAutomatic) 'Save the Workbook and quit Excel. oBook.SaveAs(sSampleFolder & "V.F." & idvoorexcel & "-" & Label6.Text & "-" & DateTime.Now.ToString("ddMMyyHHmmss") & ".xlsx") oSheet = Nothing NAR(oSheet) oBook.Close(False) NAR(oBook) oBook = Nothing oApp.Quit() NAR(oApp) oApp = Nothing System.Threading.Thread.Sleep(1500) End If Catch ex As Exception NAR(oSheet) oBook.Close(False) NAR(oBook) oSheet = Nothing oBook.Close(False) oBook = Nothing System.Threading.Thread.Sleep(1500) GC.Collect() End Try Private Sub NAR(ByVal o As Object) Try System.Runtime.InteropServices.Marshal.ReleaseComObject(o) Catch Finally o = Nothing End Try End Sub By the way nice link with the NAR Still don't know if i oversaw something? Thx D:thumbsup:

Probably I forgot all about the Shown event :doh: never use to exist before .Net 2, and probably I just got stuck in my ways! Dave Find Me On: Web|Facebook|Twitter|LinkedIn Folding Stats: Team CodeProject

Ofcourse it is. It's like a Paint routine on a Form, Panel, etc. Therefore it is not a good idea to put a messagebox in there, just do your coloring.

Hi, Googling a bit, I found: 1. the possibility you're using a networked disk which happens to have some problems; 2. you're not alone; see here[^] for instance. :) Luc Pattyn [My Articles] Nil Volentibus Arduum

You might find my Tip useful, DataGridView Column Width Grow Only Sizing[^] Dave Find Me On: Web|Facebook|Twitter|LinkedIn Folding Stats: Team CodeProject

hmm Dave i'm not that good that i can apply your last comment into my project... I searched whole day like crazy: Your example: Public Class FormMain Private WithEvents selectKlant As FormCustomerLookup = Nothing Private Sub ButtonLookup_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonLookup.Click selectKlant = New FormCustomerLookup selectKlant.Show() End Sub Private Sub selectForm_CustomerSelected(ByVal item As String) Handles selectKlant.CustomerSelected TextSelectedCustomer.Text = item selectKlant.Close() End Sub End Class Public Class FormCustomerLookup Public Event CustomerSelected(ByVal item As String) Private Sub ButtonSelect_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonSelect.Click If DataGridView1.SelectedRows.Count = 0 Then RaiseEvent CustomerSelected(DataGridView1.Item(2, 1).Value.ToString()) End If End Sub End Class I just want to change your givin example. So actually i start on formcustomerlookup and before i raise my event i want to open "formmain" and fill the textbox with the value. do i have to switch the with event or??because i cannot move the selectKlant = New FormCustomerLookup selectKlant.Show() Greetz Dave and hoping 4 some patience again...