b3e veri gir entere bas sayfa olarak eklesin Hazır Excel Makroları (VBA) | Excel Programları

Makroyu Kopyala

'Excel Makro (VBA) online eğitimleri için: https://www.excelsizeyeter.com/excelsizeyeter.com/udemy_giris.php adresine tıklayınız. Bir eğitim alana bir eğitim bedavadır. İkinci eğitim olarak Excel, Excel pratik çözümler, finans eğitimleri vb. alabilirsiniz. 
 
Option Explicit

Dim bln As Boolean
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim wks As Worksheet
    Dim strName As String
    Dim rng As Range
    Dim StAr()
    Dim InI As Integer
    Set rng = Sheets("Eingabe").Range("B3") 'hier "Auslesezelle" für neuen TabBlattNamen anpassen
    If Target.Address = rng.Address Then bln = True
    If bln = True And Target.Address  rng.Address Then
        If Len(rng)  31 Then
            MsgBox "Bitte min. 1 und max. 31 Zeichen eingeben !"
            bln = False
            Exit Sub
        End If
        StAr = Array(":", "/", "", "?", "[", "]")
        For InI = 0 To UBound(StAr)
            If InStr(1, rng, StAr(InI), 0) > 0 Then
                MsgBox "Sonderzeichen ' " & StAr(InI) & " ' nicht zulässig !"
                bln = False
                Exit Sub
            End If
        Next InI
        For Each wks In ActiveWorkbook.Worksheets
            If UCase(wks.Name) = UCase(rng) Then
                MsgBox "Es existiert bereits ein Tabellenblatt mit diesem Namen !"
                bln = False
                Exit Sub
            End If
        Next
        Sheets.Add.Move after:=Sheets("Eingabe")
        ActiveSheet.Name = rng.Value
        Sheets("Eingabe").Select
        bln = False
    End If
End Sub

Benzer Sonuçlar
No	Makro Adı
1	b3e veri gir entere bas sayfa olarak eklesin
2	excelde kendi eklenti ve fonksiyonlarınızı oluşturun
3	tarihi tam gir o tarihten sonraki ve o yıl içerisindeki haftaları sayfa olarak eklesin
4	excel sayfasında yazılanları texte çevirmek
5	aktif sayfada veri girilen hücrelere veri girildiği tarih ve saati açıklama olarak ekler
6	Seri Numaraları Ekleme: Bu makro kodu, excel sayfanıza seri numaraları otomatik olarak eklemenize yardımcı olacaktır. Bu makroyu çalıştırdıktan sonra seri numaralar için maksimum sayı girmeniz gereken bir giriş kutusu gösterecektir ve bundan sonra bir sütundaki sütuna sayı ekleyecektir.
7	Dosyayı kim açtı 2
8	listbox ve combobox'a veri girmek
9	butona hareket verir
10	dosyayı kim açtı
11	Inputbox yılı yaz, ayları sayfa olarak eklesin
12	veri olan iki ayrı sütunu birleştirme
13	işgünlerine ait sheet açmak.
14	her hangi bir sayfaya hızlı bilgi girşi için
15	9 farklı değer için koşullu biçimlendirme
16	userform'u otomatik boyutlandırma
17	Özel Sayfaları Yazdır: Yazdırma seçeneklerinden ayarı kullanmak yerine, bu kodu, özel sayfa aralığı yazdırmak için kullanabilirsiniz. 5 ila 10 arasındaki sayfaları yazdırmak istediğinizi varsayalım. Sadece bu VBA kodunu çalıştırmanız ve başlangıç sayfası ve bitiş sayfasını girmeniz yeterlidir.
18	belirlediğim verilerin klasör, dosyaadi olarak kaydı
19	korumalı hücrelere sıralama yapmak?
20	makronun otomatik olarak açılması ve çalışması

Benzer Sonuçlar

Makro Adı

b3e veri gir entere bas sayfa olarak eklesin

excelde kendi eklenti ve fonksiyonlarınızı oluşturun

tarihi tam gir o tarihten sonraki ve o yıl içerisindeki haftaları sayfa olarak eklesin

excel sayfasında yazılanları texte çevirmek

aktif sayfada veri girilen hücrelere veri girildiği tarih ve saati açıklama olarak ekler

Seri Numaraları Ekleme: Bu makro kodu, excel sayfanıza seri numaraları otomatik olarak eklemenize yardımcı olacaktır. Bu makroyu çalıştırdıktan sonra seri numaralar için maksimum sayı girmeniz gereken bir giriş kutusu gösterecektir ve bundan sonra bir sütundaki sütuna sayı ekleyecektir.

Dosyayı kim açtı 2

listbox ve combobox'a veri girmek

butona hareket verir

dosyayı kim açtı