private void btnRun_Click(object sender, System.EventArgs e)
		{
			Workbook workbook = new Workbook();
			
			workbook.LoadFromFile(@"..\..\..\..\..\..\Data\CommentSample.xls");
			//Initialize worksheet
			Worksheet sheet = workbook.Worksheets[0];

			textBox1.Text = sheet.Range["A1"].Comment.Text;
			richTextBox1.Rtf = sheet.Range["A2"].Comment.RichText.RtfText;
		}

		Private Sub btnRun_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnRun.Click
			Dim workbook As Workbook = New Workbook()

			workbook.LoadFromFile("..\..\..\..\..\..\Data\CommentSample.xls")
			'Initialize worksheet
			Dim sheet As Worksheet = workbook.Worksheets(0)

			textBox1.Text = sheet.Range("A1").Comment.Text
			richTextBox1.Rtf = sheet.Range("A2").Comment.RichText.RtfText
		End Sub

		private void ExcelDocViewer( string fileName )
		{
			try
			{
				System.Diagnostics.Process.Start(fileName);
			}
			catch{}
		}

		private void btnRun_Click(object sender, System.EventArgs e)
		{
			Workbook workbook = new Workbook();
			Worksheet sheet = workbook.Worksheets[0];

			sheet.Range["B2"].Text = "Home page";
			HyperLink hylink1 = sheet.HyperLinks.Add(sheet.Range["B3"]);
			hylink1.Type = HyperLinkType.Url;
			hylink1.Address = @"http:\\www.e-iceblue.com";

			sheet.Range["B5"].Text = "Support";
			HyperLink hylink2 = sheet.HyperLinks.Add(sheet.Range["B6"]);
			hylink2.Type = HyperLinkType.Url;
			hylink2.Address = "mailto:support(at)e-iceblue.com";
		
			workbook.SaveToFile("Sample.xls");
			ExcelDocViewer(workbook.FileName);
		}

		Private Sub ExcelDocViewer(ByVal fileName As String)
			Try
				System.Diagnostics.Process.Start(fileName)
			Catch
			End Try
		End Sub

		Private Sub btnRun_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnRun.Click
			Dim workbook As Workbook = New Workbook()
			Dim sheet As Worksheet = workbook.Worksheets(0)

			sheet.Range("B2").Text = "Home page"
			Dim hylink1 As HyperLink = sheet.HyperLinks.Add(sheet.Range("B3"))
			hylink1.Type = HyperLinkType.Url
			hylink1.Address = "http:\\www.e-iceblue.com"

			sheet.Range("B5").Text = "Support"
			Dim hylink2 As HyperLink = sheet.HyperLinks.Add(sheet.Range("B6"))
			hylink2.Type = HyperLinkType.Url
			hylink2.Address = "mailto:support(at)e-iceblue.com"

			workbook.SaveToFile("Sample.xls")
			ExcelDocViewer(workbook.FileName)
		End Sub

	private void btnRun_Click(object sender, System.EventArgs e)
		{
			Workbook workbook = new Workbook();
 
			workbook.LoadFromFile(@"..\..\..\..\..\..\Data\HyperlinkSample.xls");
            
			Worksheet sheet = workbook.Worksheets[0];

			textBox1.Text = sheet.HyperLinks[0].Address;
			textBox2.Text = sheet.HyperLinks[1].Address;
		}

		Private Sub btnRun_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnRun.Click
			Dim workbook As Workbook = New Workbook()
			workbook.LoadFromFile("..\..\..\..\..\..\Data\HyperlinkSample.xls")
			Dim sheet As Worksheet = workbook.Worksheets(0)

			textBox1.Text = sheet.HyperLinks(0).Address
			textBox2.Text = sheet.HyperLinks(1).Address
		End Sub