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["C10"].Text = "The sample demonstrates how to save an excel workbook to stream.";

			//Save an excel workbook to stream
			FileStream fileStream = new FileStream("Sample.xls",FileMode.Create);
			workbook.SaveToStream(fileStream);

			fileStream.Close();

			ExcelDocViewer(Path.Combine(Application.StartupPath,"Sample.xls"));
		}

		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("C10").Text = "The sample demonstrates how to save an excel workbook to stream."

			'Save an excel workbook to stream
			Dim fileStream As FileStream = New FileStream("Sample.xls",FileMode.Create)
			workbook.SaveToStream(fileStream)

			fileStream.Close()

			ExcelDocViewer(Path.Combine(Application.StartupPath,"Sample.xls"))
		End Sub

The sample demonstrates how to lock and unlock an excel workbook.

using System;

using Spire.Xls;

namespace CellProtection
{
    class Program
    {
        static void Main(string[] args)
        {
            Workbook workbook = new Workbook();

            //Initialize worksheet
            workbook.CreateEmptySheets(1);
            Worksheet sheet = workbook.Worksheets[0];

            //Set the password
            Console.Write("Please input password:");
            string str = Console.ReadLine();
            Console.ReadKey();

            //Protect cells
            sheet.Range["A1"].Text = "Locked";
            sheet.Range["B1"].Text = "Unlocked";

            sheet.Range["A1"].Style.Locked = true;
            sheet.Range["B1"].Style.Locked = false;

            //Protect workbook
            workbook.Protect(str);
            workbook.SaveToFile("Sample.xls");
            System.Diagnostics.Process.Start(workbook.FileName);
        }
    }
}

Imports Spire.Xls
Module Module1

    Sub Main()
    
        Dim workbook As Workbook = New Workbook()

        'Initialize worksheet
        workbook.CreateEmptySheets(1)
        Dim sheet As Worksheet = workbook.Worksheets(0)

        'Protect workshet
        Console.Write("Please input password:")
        Dim str As String = Console.ReadLine()
        Console.ReadKey()

        sheet.Protect(str)

        'Protect cells
        sheet.Range("A1").Text = "Locked"
        sheet.Range("B1").Text = "Unlocked"

        sheet.Range("A1").Style.Locked = True
        sheet.Range("B1").Style.Locked = False

        'Protect workbook
        workbook.Protect(str)

        workbook.SaveToFile("Sample.xls")
        System.Diagnostics.Process.Start(workbook.FileName)
    End Sub
End Module

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

			//Writes new sheet name
			sheet.Range["A1"].Text = this.textBox1.Text;

			workbook.SaveToFile("Sample.xls");
			ExcelDocViewer(workbook.FileName);
		}

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

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

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

			'Writes new sheet name
			sheet.Range("A1").Text = Me.textBox1.Text

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

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