@ozguryasin tarafından yapılan MySql örneğini ufak düzenlemeler ile MsSql Server için uyarladım.

VBA penceresinde yer alan SqlServerConnStr modülündeki SqlServerConnStringGetir isimli fonksiyon bize MsSql Server'a bağlantı için gereken SqlServer Connection String (SqlServer'a Bağlantı Cümlesi) geri döndürür.

MsSql'e bağlantı için iki tür yöntem vardır:

1- Windows Authentication ile kendi bilgisayarınızda herhangi bir kullanıcı adı ve şifre gerektirmeden MsSql Server'a bağlanabilirsiniz. Bizim örneğimizde varsayılan olarak bu şekilde çalışmaktadır.
2- Eğer uzak bir makinede yer alan MsSql Server'a bağlanmak isterseniz ya da kendi sunucunuzda bile olsa Kullanıcı Adı ve Şifre ile bağlanmak istiyorsanız bu yöntemi kullanırsınız.

Eğer 2. yöntemi kullanacaksanız yapmanız gereken iki şey var:
1- BaglantiTuru değişkeninin içindeki değeri yani Windows Auth silin.
2- UserName ve Password değişkenlerinin değerini sunucunuza göre değiştirin.

Örnek kendi bilgisayarınızda çalışmayacaktır çünkü veritabanı bilgisayarınızda yok. Ne yapmanız gerek?

1- ServerName değişkenini kendi sunucunuza göre değiştirin.
2- DatabaseName değişkenine veritabanınızın adını yazın.