DOBON.NETプログラミング掲示板過去ログ
SPREADの改行とHyperLinkについて
題名: SPREADの改行とHyperLinkについて
著者: RUNA
日時: 2010/09/28 11:37:10
ID: 27364
この記事の返信元:
(なし)
この記事への返信:
(なし)
ツリーを表示
環境/言語:[VB.NET]
分類:[ASP.NET]
SPREADに関しての質問です。
(spread for .net 3.0j web forms edition & VS2008)
セル内に改行した文字列(プログラム設定)に対してHyperLinkを設定するには
どのようにすれば実装できるのでしょうか?
CellTypeは1つだけしか定義できないようなので、
下記コードを実行した場合、HyperLinkは貼られるのですが、
改行されなくなってしまいます。
お手数ですが、ご教授頂けないでしょうか?
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim linkURL As String = "http://www.google.co.jp/"
Dim linkcell As New FarPoint.Web.Spread.HyperLinkCellType()
linkcell.NavigateUrl = linkURL
Dim tc As New FarPoint.Web.Spread.TextCellType
tc.Multiline = True
FpSpread1.ActiveSheetView.Cells(1, 1).CellType = tc
FpSpread1.ActiveSheetView.Cells(1, 1).Value = "A" & vbCrLf & "B"
FpSpread1.ActiveSheetView.Cells(1, 1).CellType = linkcell
End Sub
DOBON.NET
|
プログラミング道
|
プログラミング掲示板
分類:[ASP.NET]
SPREADに関しての質問です。
(spread for .net 3.0j web forms edition & VS2008)
セル内に改行した文字列(プログラム設定)に対してHyperLinkを設定するには
どのようにすれば実装できるのでしょうか?
CellTypeは1つだけしか定義できないようなので、
下記コードを実行した場合、HyperLinkは貼られるのですが、
改行されなくなってしまいます。
お手数ですが、ご教授頂けないでしょうか?
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim linkURL As String = "http://www.google.co.jp/"
Dim linkcell As New FarPoint.Web.Spread.HyperLinkCellType()
linkcell.NavigateUrl = linkURL
Dim tc As New FarPoint.Web.Spread.TextCellType
tc.Multiline = True
FpSpread1.ActiveSheetView.Cells(1, 1).CellType = tc
FpSpread1.ActiveSheetView.Cells(1, 1).Value = "A" & vbCrLf & "B"
FpSpread1.ActiveSheetView.Cells(1, 1).CellType = linkcell
End Sub