BlogJava-xiekai-blog-最新评论http://www.blogjava.net/xiekai-blog/CommentsRSS.aspx北冥有鱼，其名为鲲。鲲之大，不知其几千里也。化而为鸟，其名为鹏。鹏之背，不知其几千里也。怒而飞，其翼若垂天之云。是鸟也，海运则将徙于南冥。南冥者，天池也。 zh-cnFri, 06 Apr 2012 03:54:50 GMTFri, 06 Apr 2012 03:54:50 GMTcnblogsre: vb.net中dataGridView的单元格的合并http://www.blogjava.net/xiekai-blog/archive/2011/06/12/282825.html#352137acicdacicdSun, 12 Jun 2011 10:23:00 GMThttp://www.blogjava.net/xiekai-blog/archive/2011/06/12/282825.html#352137acicd@sohu.com

acicd 2011-06-12 18:23 发表评论
]]>re: vb.net中dataGridView的单元格的合并http://www.blogjava.net/xiekai-blog/archive/2011/05/23/282825.html#350846阿伍阿伍Mon, 23 May 2011 08:49:00 GMThttp://www.blogjava.net/xiekai-blog/archive/2011/05/23/282825.html#350846

阿伍 2011-05-23 16:49 发表评论
]]>re: vb.net中dataGridView的单元格的合并http://www.blogjava.net/xiekai-blog/archive/2011/05/10/282825.html#349924阿胡阿胡Tue, 10 May 2011 08:50:00 GMThttp://www.blogjava.net/xiekai-blog/archive/2011/05/10/282825.html#349924nineheads@tom.com


阿胡 2011-05-10 16:50 发表评论
]]>re: vb.net中dataGridView的单元格的合并http://www.blogjava.net/xiekai-blog/archive/2011/04/16/282825.html#348414xinboxinboSat, 16 Apr 2011 13:07:00 GMThttp://www.blogjava.net/xiekai-blog/archive/2011/04/16/282825.html#348414
If e.RowIndex > -1 AndAlso e.ColumnIndex > -1 AndAlso e.Value IsNot Nothing（此处添加判断） Then
DrawCell(e)
End If

End Sub

修改第二处：

For i = e.RowIndex To Me.Rows.Count - 1 Step i + 1
If Me.Rows(i).Cells(e.ColumnIndex).Value Is Nothing Then
Exit For
End If ‘添加一个判断
If Me.Rows(i).Cells(e.ColumnIndex).Value.ToString().Equals(curValue) Then

DownRows = DownRows + 1
If e.RowIndex <> i Then
cellwidth = cellwidth
IIf(cellwidth < Me.Rows(i).Cells(e.ColumnIndex).Size.Width, cellwidth, Me.Rows(i).Cells(e.ColumnIndex).Size.Width)
End If
Else
Exit For
End If
Next

xinbo 2011-04-16 21:07 发表评论
]]>re: vb.net中dataGridView的单元格的合并http://www.blogjava.net/xiekai-blog/archive/2011/03/18/282825.html#346533xiekaixiekaiFri, 18 Mar 2011 06:27:00 GMThttp://www.blogjava.net/xiekai-blog/archive/2011/03/18/282825.html#346533邮箱：niaiyaolong@163.com
谢谢！

xiekai 2011-03-18 14:27 发表评论
]]>re: vb.net中dataGridView的单元格的合并http://www.blogjava.net/xiekai-blog/archive/2010/12/16/282825.html#340919pxfinalpxfinalThu, 16 Dec 2010 11:56:00 GMThttp://www.blogjava.net/xiekai-blog/archive/2010/12/16/282825.html#340919 Me.RowMergeView1.MergeColumnNames.Add("Column" & i)这个时候

Set(ByVal Value As Collection)
_mergecolumnname = Value ‘value=nothing
End Set
这样就将这个属性再次赋值为空了， 无法添加。

pxfinal 2010-12-16 19:56 发表评论
]]>re: 查找EXCEL的一列中重复的数据http://www.blogjava.net/xiekai-blog/archive/2010/09/02/181004.html#330732jimsjimsThu, 02 Sep 2010 07:08:00 GMThttp://www.blogjava.net/xiekai-blog/archive/2010/09/02/181004.html#330732判断是否为空，如果是空，不做操作，
非空才做COUNTIF


jims 2010-09-02 15:08 发表评论
]]>re: 查找EXCEL的一列中重复的数据http://www.blogjava.net/xiekai-blog/archive/2010/09/02/181004.html#330731jimsjimsThu, 02 Sep 2010 07:07:00 GMThttp://www.blogjava.net/xiekai-blog/archive/2010/09/02/181004.html#330731=if(A1<>"","",IF(COUNTIF($A:$A,A1)>1,"重复","")

jims 2010-09-02 15:07 发表评论
]]>re: 招财猫http://www.blogjava.net/xiekai-blog/archive/2010/08/31/330416.html#330426onejavaeronejavaerTue, 31 Aug 2010 06:54:00 GMThttp://www.blogjava.net/xiekai-blog/archive/2010/08/31/330416.html#330426

onejavaer 2010-08-31 14:54 发表评论
]]>re: vb.net中dataGridView行号的描画[未登录]http://www.blogjava.net/xiekai-blog/archive/2010/08/03/282831.html#327875AAAATue, 03 Aug 2010 15:25:00 GMThttp://www.blogjava.net/xiekai-blog/archive/2010/08/03/282831.html#327875

AA 2010-08-03 23:25 发表评论
]]>re: 使用EXCEL宏取得所有Sheet名http://www.blogjava.net/xiekai-blog/archive/2010/07/11/180993.html#325790BBQBBQSun, 11 Jul 2010 09:32:00 GMThttp://www.blogjava.net/xiekai-blog/archive/2010/07/11/180993.html#325790Worksheets(Sheets(1).Name) 可以被 Worksheets(1) 替换

这样比较简单:)

BBQ 2010-07-11 17:32 发表评论
]]>re: 使用EXCEL宏取得所有Sheet名http://www.blogjava.net/xiekai-blog/archive/2010/07/11/180993.html#325789BBQBBQSun, 11 Jul 2010 09:29:00 GMThttp://www.blogjava.net/xiekai-blog/archive/2010/07/11/180993.html#325789Sub SheetName()

For i = 1 To Sheets.Count

Worksheets(Sheets(1).Name).Cells(i, 1).Value = Sheets(i).Name
Next i

End Sub

简化
Worksheets(Sheets(1).Name) = Worksheets(i)

BBQ 2010-07-11 17:29 发表评论
]]>re: vb.net中dataGridView的单元格的合并http://www.blogjava.net/xiekai-blog/archive/2010/04/26/282825.html#319397youkeyoukeMon, 26 Apr 2010 07:53:00 GMThttp://www.blogjava.net/xiekai-blog/archive/2010/04/26/282825.html#319397

youke 2010-04-26 15:53 发表评论
]]>re: vb.net中dataGridView的单元格的合并http://www.blogjava.net/xiekai-blog/archive/2010/01/21/282825.html#310391JonesValeJonesValeThu, 21 Jan 2010 06:44:00 GMThttp://www.blogjava.net/xiekai-blog/archive/2010/01/21/282825.html#310391Me.rowMergeView1.MergeColumnNames = CType(resources.GetObject("rowMergeView1.MergeColumnNames"), System.Collections.Generic.List(Of String))


JonesVale 2010-01-21 14:44 发表评论
]]>re: vb.net中dataGridView的单元格的合并http://www.blogjava.net/xiekai-blog/archive/2010/01/20/282825.html#310229JonesValeJonesValeWed, 20 Jan 2010 06:09:00 GMThttp://www.blogjava.net/xiekai-blog/archive/2010/01/20/282825.html#310229'
'rowMergeView1
'
Me.rowMergeView1.AllowUserToAddRows = False
Me.rowMergeView1.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill
Me.rowMergeView1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.rowMergeView1.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.Column1, Me.Column2, Me.Column3, Me.Column4, Me.Column5, Me.Column6})
Me.rowMergeView1.Dock = System.Windows.Forms.DockStyle.Fill
Me.rowMergeView1.Location = New System.Drawing.Point(0, 0)
Me.rowMergeView1.MergeColumnNames = CType(resources.GetObject("rowMergeView1.MergeColumnNames"), System.Collections.Generic.List(Of String))
Me.rowMergeView1.Name = "rowMergeView1"
Me.rowMergeView1.RowTemplate.Height = 21
Me.rowMergeView1.Size = New System.Drawing.Size(595, 343)
Me.rowMergeView1.TabIndex = 0



JonesVale 2010-01-20 14:09 发表评论
]]>