Kod:
If TextBox_Gsm.Value <> "" Then
TextBox_Gsm.Value = Replace(Replace(Replace(Replace(TextBox_Gsm.Value, "(", ""), ")", ""), " ", ""), "-", "")
ThisWorkbook.Worksheets("Ana_Sayfa").Cells(SonSatir, 30).NumberFormat = "@"
ThisWorkbook.Worksheets("Ana_Sayfa").Cells(SonSatir, 30) = "+90" & TextBox_Gsm.Value
ThisWorkbook.Worksheets("WHATSAPP").Cells(Rows.Count, 1).End(3)(2, 1).NumberFormat = "@"
ThisWorkbook.Worksheets("WHATSAPP").Cells(Rows.Count, 1).End(3)(2, 1).Value = "+90" & TextBox_Gsm.Value
Else