Thema Datum  Von Nutzer Rating
Antwort
11.08.2022 15:16:17 Chris
Solved
Blau Zelle durch klick befüllen
 11.08.2022 15:38:12 Flatulenz
NotSolved
11.08.2022 15:50:41 Chris
NotSolved
11.08.2022 15:50:42 Chris
NotSolved
11.08.2022 15:44:00 Gast60087
NotSolved
11.08.2022 16:02:58 Chris
NotSolved
11.08.2022 20:38:34 Gast60087
NotSolved
11.08.2022 20:50:54 Gast31887
NotSolved
12.08.2022 07:12:29 Gast66810
Solved
12.08.2022 08:33:01 Chris
NotSolved
12.08.2022 14:51:00 Gast22242
*****
NotSolved

Ansicht des Beitrags:
Von:
Flatulenz		 Datum:
11.08.2022 15:38:12		 Views:
642		 Rating:
     
Antwort:
  Ja
Thema:
Zelle durch klick befüllen

Hi

eine Möglichkeit

ins Codemodul von Tabellenblatt Ranking diesen Code

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Rows(2)) Is Nothing Then
        Set rngAlt = ActiveCell
    End If
End Sub

 

in das Tabellenblatt User diesen Code

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Range("A1:J10")) Is Nothing Then
        Sheets("Ranking").Cells(rngAlt.Row, rngAlt.Column).Value = ActiveCell.Value
    End If
End Sub

 

und in ein Modul dieses

Option Explicit

Global rngAlt As Range

 

viel Schbaß

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
11.08.2022 15:16:17 Chris
Solved
Blau Zelle durch klick befüllen
 11.08.2022 15:38:12 Flatulenz
NotSolved
11.08.2022 15:50:41 Chris
NotSolved
11.08.2022 15:50:42 Chris
NotSolved
11.08.2022 15:44:00 Gast60087
NotSolved
11.08.2022 16:02:58 Chris
NotSolved
11.08.2022 20:38:34 Gast60087
NotSolved
11.08.2022 20:50:54 Gast31887
NotSolved
12.08.2022 07:12:29 Gast66810
Solved
12.08.2022 08:33:01 Chris
NotSolved
12.08.2022 14:51:00 Gast22242
*****
NotSolved