Protected Sub ExportButton_Click(ByVal sender As Object, ByVal e As _
  System.EventArgs) Handles ExportButton.Click
 
Dim pn As String
 
For Each row As GridViewRow In GridView1.Rows
Dim cb As CheckBox = row.FindControl("ExportCB")
If cb IsNot Nothing AndAlso cb.Checked Then
 
'System.Diagnostics.Debug.Print(row.RowIndex)
Dim rows As GridViewRow = GridView1.Rows.Item(row.RowIndex)
pn = row.Cells(3).Text
 
System.Diagnostics.Debug.Print(pn)
Call createDoc(pn)
End If
Next
End Sub
 
Für jedes markierte Element soll "createDoc" aufgerufen werden. Das steckt in _
  einem Modul.
Hier der Code:
 
Sub createDoc(ByVal pn As String)
Dim ConnString As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data" & _
  "Source=WebTool.accdb; Persist Security Info=False;"
Dim SQLString As String = "Select * From GE7 WHERE ProjectNumber ='" & pn & "'"
Dim conn As New OleDbConnection(ConnString)
Dim cmd As New OleDbCommand(SQLString, conn)
cmd.CommandType = CommandType.Text
conn.Open()
 
Dim reader As OleDbDataReader = cmd.ExecuteReader()
reader.Read()
 
 
Dim stream As MemoryStream = DocumentReader.Create()
Dim doc As WordprocessingDocument = WordprocessingDocument.Create(stream, _
  WordprocessingDocumentType.Document)
Dim mainPart As MainDocumentPart = doc.AddMainDocumentPart
mainPart.Document = New Document
 
Text Formatierungen....
 
Dim body As Body = New Body()
body.Append(para1)
body.Append(para2)
 
 
mainPart.Document.Append(body)
 
mainPart.Document.Save()
doc.Close()
 
'System.Diagnostics.Debug.Print(SQLString)
reader.Close()
conn.Close()
Dim ha As HttpApplication = HttpContext.Current.ApplicationInstance
ha.Response.Clear()
ha.Response.AddHeader("content-disposition", [String].Format( _
  "attachment;filename={0}", pn & ".docx"))
ha.Response.ContentType = _
"application/vnd.openxmlformats-officedocument.wordprocessingml.document"
stream.WriteTo(ha.Response.OutputStream)
ha.Response.[End]()
End Sub

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist