Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
508to512
508to512
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

2 Bedingungen erfüllt, Wert eintragen per VBA?

Forumthread: 2 Bedingungen erfüllt, Wert eintragen per VBA?

2 Bedingungen erfüllt, Wert eintragen per VBA?
27.10.2004 20:19:25
Birgit
Guten Abend zusammen!
Habe diese Frage schon mal gestellt, möchte es dennoch nochmal versuchen, habe mir dafür extra Jeanie Html besorgt.
Also Folgendes:
Habe zwei Tabellenblätter. Das Tabellenblatt 1 sieht folgendermaßen aus:
1
  
 ABCDEFG
1     für  
2     für 38,5 Stdfür Std  (c6) lt.Vertrag
3Name :          Basis: Grundvergütung:2.392,94 €                2.392,94 € 
4Std./Wch. 38,5  Allgemeine Zulage                          -   € 
5geborenMon/J12.10.1974  Ortszuschlag I                          -   € 
6Personalnummer:   Ortszuschlag II                          -   € 
7Alter:31  Ortszuschlag III                          -   € 
8Verg´gr.GemeindeIII  Außertarifl.Zulage                          -   € 
Formeln der Tabelle
G3 : =F3/38,5*C4
G4 : =F4/38,5*C4
G5 : =F5/38,5*C4
G6 : =F6/38,5*C4
G7 : =F7/38,5*C4
G8 : =F8/38,5*C4
 
 Diagramm - Grafik - Excel Tabellen einfach im Web darstellen    Excel Jeanie HTML  3.0    Download  
Das Tabellenblatt 2 sieht so aus:


Tabelle1
  
 ABCDEFGHIJKLMNO
1VergütungsgruppeGrundvergütung der Lebensaltersstufe nach vollendetem
221.23.25.27.29.31.33.35.37.39.41.43.45.47.
3Lebensjahr (monatlich in Euro)
4I a0,00 € 2.743,04 € 2.868,43 € 2.993,77 € 3.119,15 € 3.244,53 € 3.369,22 € 3.495,33 € 3.620,67 € 3.746,05 € 3.871,43 € 3.996,84 € 4.122,18 € 4.242,41 € 
5I b0,00 € 2.438,58 € 2.559,12 € 2.679,65 € 2.800,18 € 2.920,71 € 3.041,25 € 3.161,79 € 3.282,31 € 3.402,86 € 3.523,38 € 3.643,91 € 3.764,44 € 3.884,69 € 
6II a0,00 € 2.161,54 € 2.727,26 € 2.383,00 € 2.493,68 € 2.604,39 € 2.715,12 € 2.825,81 € 2.936,54 € 3.047,24 € 3.157,99 € 3.268,69 € 3.379,34 € 0,00 € 
7II b0,00 € 2.015,45 € 2.116,34 € 2.217,26 € 2.318,19 € 2.419,13 € 2.520,05 € 2.620,97 € 2.721,90 € 2.822,82 € 2.923,76 € 3.024,66 € 3.068,76 € 0,00 € 
8III1.921,05 € 2.015,45 € 2.109,80 € 2.204,17 € 2.298,57 € 2.392,94 € 2.487,32 € 2.581,69 € 2.676,06 € 2.770,45 € 2.864,85 € 2.959,23 € 3.049,00 € 0,00 € 
 
 Diagramm - Grafik - Excel Tabellen einfach im Web darstellen    Excel Jeanie HTML  3.0    Download  

Entscheidend sind nun die Zellen C7 und C8 vom Tabellenblatt 1
Wenn nun z.B. in der Zelle C7 = 31 ist
             und die Zelle C8 = III
dann soll der dazugehörige Wert aus dem Tabellenblatt 2 in die Zelle F3 des Tabellenblattes 1 eingetragen werden (hier also 2.392,94 €).

Dies sollte per Makro laufen !!!

Ich hoffe mir kann jamand helfen, wäre Euch sehr Dankbar !!!

Gruß
Birgit
 

                    

                                    


    
Anzeige

    

        
                    
            
                
    



                        




    
    
    
    

    

        

                        
            3
            
Beiträge zum Forumthread

            
Beiträge zu diesem Forumthread

        

    


    
    

    

                    

                
                Betreff
            

            
Datum

            
Anwender

            

    
    


    
Anzeige

    

        
                    
            
                
    



    
    



    
            
                    
                                
                    
                                

    
    

        

            
            

                                    

                                                    
                            AW: 2 Bedingungen erfüllt, Wert eintragen per VBA?
                                            

                                

                                            HerbertH
                                    

            

        

        

                            
hallo Birgit,
so könnte es gehen...



Option Explicit
Sub x()
Dim sh As Worksheet, sh1 As Worksheet
Dim i As Byte, s As Byte

 Set sh = Worksheets("Tabelle1")
 Set sh1 = Worksheets("Tabelle2")
 
   For i = 4 To 8
    For s = 2 To 14
     If sh1.Cells(i, 1) = sh.[c8] And _
        sh1.Cells(2, s) = sh.[c7] Then
        
        sh.[f3] = sh1.Cells(i, s)
     End If
  Next
 Next
End Sub



     gruß Herbert

https://www.herber.de/bbs/user/12723.xls

                    

                                    


    
Anzeige

    

        
                    
            
                
    



                        



                    
                                

    
    

        

            
            

                                    

                                                    
                            Danke !!!!!! m.T. :-)
                                            

                    

                                                    27.10.2004 23:51:36
                                            

                                

                                            Birgit
                                    

            

        

        

                            
Danke Herbert!!

Du hast mir sehr geholfen, da soll mal einer drauf kommen. Wünsche Dir noch einen schönen Abend bzw. einen guten Morgen!!

Gruß
Birgit

                    

            



                
    ;

    
            


    

        
        Forumthreads zu verwandten Themen
    

    
    

        

                
                
                

            
                

                    

                        

                            
                            Mittels VBA Zellbereich einfärben
                        

                                                    

                                Fred
                            

                                            

                    

                                                

Hallo zusammen

Ich habe da ein Problem, und zwar stehen bei mir in der Tabelle im Bereich D2 bis AD100 unterschiedliche Datums. Wenn das Datum kleiner ist als das heutige, hätte ich gerne, das sich die entsprechende Zelle Rot färbt. Ich habe das mal mit bedingter Formatierung versucht, aber...
                    

                    

                        

                                                            13.08.2008 18:52:00
                                                    

                        

                            Thread-ID:
                            1001623
                        

                        

                            13
                            Beiträge
                        

                    

                

            
        

                
                
                

            
                

                    

                        

                            
                            VBA zur Dateneingabe über mehrere Blätter
                        

                                                    

                                Eddie
                            

                                            

                    

                                                

Hallo @ all,

ich suche ein kleines Makro, womit man in allen Tabellenblättern, außer ein Paar vorher defnierten einen bestimmten Wert in eine bestimmt Zelle reinkopiert...

Vielleicht geht sowas mit Comboboxen ? .. aber auch ein Makro, wo man die TB die nicht dafür verwendet werden solle...
                    

                    

                        

                                                            18.08.2008 14:44:00
                                                    

                        

                            Thread-ID:
                            1002607
                        

                        

                            3
                            Beiträge
                        

                    

                

            
        

                
                
                    

                


    
Anzeige

    

        
                    
            
                
    



            

                            

            
                

                    

                        

                            
                            Dynamische Wertänderung in VBA
                        

                                                    

                                Timo
                            

                                            

                    

                                                

Hallo,

ich habe ein kleines Problem und möchte vorab sagen, dass ich ein wirklicher VBA Laie bin. Ich habe folgendes Makro aufgenommen (nicht selbst geschrieben, da ich das nicht kann):

Sub updatechartloanvolumetrend()

If Range("C10") = "19981998" Then

ActiveSheet.ChartObjects("...
                    

                    

                        

                                                            05.09.2008 09:38:00
                                                    

                        

                            Thread-ID:
                            1007590
                        

                        

                            3
                            Beiträge
                        

                    

                

            
        

                
                
                    

                


    
Anzeige

    

        
                    
            
                
    



            

                            

            
                

                    

                        

                            
                            Formel in Zelle per VBA einfügen
                        

                                                    

                                Werner
                            

                                            

                    

                                                

Wie kann ich Statistikformeln (Mittelwert, Maximum, Minimum, Standardabweichung) per VBA in eine Zelle einfügen? 

Der zu berechnende Bereich geht von "$J$1" bis "$J$n" wobei n mit ActiveCell.Row-2 zuvor berechnet wird.

Gruß Werner.

                    

                    

                        

                                                            10.09.2008 14:17:46
                                                    

                        

                            Thread-ID:
                            1008801
                        

                        

                            5
                            Beiträge
                        

                    

                

            
        

                
                
                    

                


    
Anzeige

    

        
                    
            
                
    



            

                            

            
                

                    

                        

                            
                            Ersetzen mit VBA in allen Arbeitsblättern
                        

                                                    

                                Walter
                            

                                            

                    

                                                

Hallo,

ich habe eine Frage:

Wenn ich einen Text in der ganzen Arbeitsmappe ersetzen will, so treffe ich im Dialogfeld SUCHEN/ERSETZEN einfach die Einstellung: Suchen --- "Arbeitsblatt".

Wenn ich disen Vorgang aufzeichen, kommt folgender Code heraus:

Selection.Replace What:= _
                    

                    

                        

                                                            11.09.2008 15:35:53
                                                    

                        

                            Thread-ID:
                            1009157
                        

                        

                            6
                            Beiträge
                        

                    

                

            
        

                
                
                

            
                

                    

                        

                            
                            Kopieren VBA anstatt einer Formellösung
                        

                                                    

                                Bernhard
                            

                                            

                    

                                                

Hallo liebe Excel-Freunde,

wer kann mir helfen, eine Aufgabenstellung, die ich zwar mit Formeln gelöst habe mit einem VBA Makro zu lösen. Wie kopiere und paste ich Werte aus einer Tabelle1 in eine Tabelle2, abhängig davon ob ein Wert in einer bestimmten Spalte ist. Das Beispiel habe ich zum...
                    

                    

                        

                                                            24.09.2008 17:28:00
                                                    

                        

                            Thread-ID:
                            1012129
                        

                        

                            9
                            Beiträge
                        

                    

                

            
        

                
                
                

            
                

                    

                        

                            
                            Code für Groß- und Kleinschreibung VBA
                        

                                                    

                                Urmila
                            

                                            

                    

                                                

Hallo,

ich habe folgenden Code (Teil vom Code)

If Cells(iRow, 1).Value = "x" Then

Hierbei erkennt Excel nur das kleine x und nicht das große X. Wie kann man das umgehen, dass Groß- und Kleinschreibung nciht geachtet werden sollen bzw beachten werden sollen?

LG

Urmila

                    

                    

                        

                                                            09.10.2008 14:16:51
                                                    

                        

                            Thread-ID:
                            1015349
                        

                        

                            3
                            Beiträge
                        

                    

                

            
        

                
                
                    

                


    
Anzeige

    

        
                    
            
                
    



            

                            

            
                

                    

                        

                            
                            VBA Zellen prüfen, txt kopieren, einfügen in txt
                        

                                                    

                                Stevie
                            

                                            

                    

                                                

Hallo Zusammen,

da ich kaum Erfahrung im Bereich VBA habe hätte ich gerne mal folgendes Problem :)

Ich habe folgenden Code der Variablen in einer Textdatei ersetzt, eine neue Datei speichert und die File anschleißend mittels Batchrutine an einen Drucker schickt.

Hier der bisherige C...
                    

                    

                        

                                                            06.11.2008 09:56:19
                                                    

                        

                            Thread-ID:
                            1022167
                        

                        

                            3
                            Beiträge
                        

                    

                

            
        

                
                
                

            
                

                    

                        

                            
                            VBA heutiges Datum finden und Inhalt der Zelle prü
                        

                                                    

                                NeptunesChild
                            

                                            

                    

                                                

Hallo Leutz,

ich möchte in einer Zeiterfassung auf einem Monatsblatt das heutige Datum finden, dann in einer anderen Spalte (5 weiter links) eine Uhrzeit eintragen. Zuvor soll aber die Kontrolle erfolgen, ob in der Zelle bereits etwas steht und ob dies kleiner ist, als die aktuelle Zeit. We...
                    

                    

                        

                                                            06.11.2008 15:38:08
                                                    

                        

                            Thread-ID:
                            1022323
                        

                        

                            3
                            Beiträge
                        

                    

                

            
        

                
                
                

            
                

                    

                        

                            
                            Per VBA eintragen und löschen
                        

                                                    

                                HansP
                            

                                            

                    

                                                

Hallo!

Ich habe ein bzw. mehrere Probleme. Ich muss in Excel eine kleine Verwaltung realisieren. Ich habe mehrere Tabellenblätter, die für die einzelnen Produkte stehen. Benennung ist identisch mit der Gruppe. 

Die Tabelle selbst ist so aufgebaut:

lfd. Nr. | Menge | Eingang   | Kürz...
                    

                    

                        

                                                            06.11.2008 23:36:00
                                                    

                        

                            Thread-ID:
                            1022472
                        

                        

                            3
                            Beiträge
                        

                    

                

            
        

                
                
                

            
                

                    

                        

                            
                            Per VBA Namen in Zellbezüge
                        

                                                    

                                Nico
                            

                                            

                    

                                                

Hallo,

nach ewiger - jedoch erfolgloser - Recherche im Web möchte ich mich mit meinem Problem an das Forum wenden.

Aus einer Arbeitsmappe mit ca. 20 Blättern soll ein Blatt kopiert werden, welches separat gespeichert und dann an verschiedene Empfänger verschickt werden soll. Das Blatt v...
                    

                    

                        

                                                            07.11.2008 15:05:15
                                                    

                        

                            Thread-ID:
                            1022699
                        

                        

                            3
                            Beiträge
                        

                    

                

            
        

                
                
                

            
                

                    

                        

                            
                            VBA abbrechen einfügen
                        

                                                    

                                maruseru
                            

                                            

                    

                                                

Hallo werte Profis

Habe den untenstehend Code übernommen und die Name der Arbeitsblätter angepasst. 

Folgendes:

Besteht das Arbeitsblatt 'Selected' bereits, erscheint die Inputbox für die Eingabe des gewünschten Namen.

Wie kann ich diese Inputbox abbrechen?

Danek und Gruss
                    

                    

                        

                                                            07.11.2008 15:13:40
                                                    

                        

                            Thread-ID:
                            1022705
                        

                        

                            4
                            Beiträge
                        

                    

                

            
        

                

    


                

            

                

                    
                    Entdecke relevante Threads
                

                
Schau dir verwandte Threads basierend auf dem aktuellen Thema an

                 
                    Alle relevanten Threads mit Inhaltsvorschau entdecken
                
            

            




 

    
    
                        


    
Anzeige

    

        
                    
            
                
    



                


    
    
    

    
    
    
            


    

        
        Beliebteste Forumthreads (12 Monate)
    

    
    

 

    
    
    

    
    

    

        

            

                
                    Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
                
            

            

                

                
            

        

    




    
    

    
    
            
 

            
            

                
                
                
                


    
Anzeige

    

        
                    
            
                
    



                


    
Anzeige

    

        
                    
            
                
    



                

                
                
                

                    

        
Entdecke mehr

    

                    
            

                

                    

                        

                            
                            Finde genau, was du suchst
                        

                        
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten
                            zu finden

                        
                            
                            Suche nach den besten Antworten
                        
                    

                

            

                            
            

                

                    

                        

                            
                            Unsere beliebtesten Threads
                        

                        
Entdecke unsere meistgeklickten Beiträge in der Google Suche

                        
                            
                            Top 100 Threads jetzt ansehen
                        
                    

                

            

                
    



                

                

                


    
Anzeige