Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1328to1332
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1328to1332
1328to1332
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Randomize Zahl und Konstanten Buchstaben auslesen

Randomize Zahl und Konstanten Buchstaben auslesen
06.09.2013 10:36:34
Thomas_B
Hallo,
wäre super wenn mir jemand helfen könnte.
https://www.herber.de/bbs/user/87172.xlsx
Ich bräuchte eine Funktion welche mir aus der discount - Spalte den Wert ausliest,
ihn zu einem Buchstaben welcher konstant zu einem der Werte der calculation key table passt umwandelt und mit drei Zufallszahlen vermischt.
Dabei sollte der Buchstabe an 3. Stelle des 4-stelligen Konstrukts stehen.
Beispiel: 5% entspricht A; 12A9.
Dieser Wert sollte dann in der dazugehörigen Zeile in der Spalte calculation key statisch geschrieben werden nach ausführen des Makros.
Wäre wirklich super wenn ihr mir helfen könntet.
Bei Rückfragen einfach kurz schreiben.
Vielen Dank im vorraus.
Mit freundlichen Grüßen
Thomas

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Randomize Zahl und Konstanten Buchstaben auslesen
06.09.2013 10:56:58
Rudi
Hallo,
Sub aaaa()
Dim rngC As Range, x As String, a(2) As Integer, i As Integer
For Each rngC In Range(Cells(3, 9), Cells(Rows.Count, 9).End(xlUp))
For i = 0 To 2
Randomize
a(i) = Int(Rnd * 9) + 1
Next
If IsNumeric(rngC) Then
x = Cells(Application.Match(rngC / 100, Range("O5:O13"), 0) + 4, 14)
Else
x = Cells(Application.Match(rngC, Range("O5:O13"), 0) + 4, 14)
End If
With rngC.Offset(, -2)
.NumberFormat = "@"
.Value = a(0) & a(1) & x & a(2)
End With
Next
End Sub

Gruß
Rudi
Anzeige

299 Forumthreads zu ähnlichen Themen

mtrans und variabler Zellbezug
Peter

Hallöchen an alle Excler,
dachte bisher, dass ich mich recht gut auskenne in Excel, aber wie immer wird man des öfteren eines besseren belehrt.
Folgende Formel habe ich:
{=SUMMENPRODUKT((T(INDIREKT(""&MTRANS(Aktionen!$A$2:$A$5)&"!A"&ZEILE($1:$100)))=A4) *(N(INDIREKT(""&a...
20.09.2008 13:28:45
Thread-ID: 1011196
3 Beiträge
Anzeige
Dropdown-Auswahlliste: Ausgabe anderer Text
Daniel

Hallo
Ich habe eine Dropdown-Auswahlliste erstellt, die auch funktioniert. Nun möchte ich aber, dass aus Platzgründen ein anderer (kürzerer) Text ausgegeben wird als in der Auswahlliste angezeigt wird.
Beispiel: Anzeige = Telefon ----- Ausgabe im Feld = Tel.
Ist das überhaupt mac...
04.12.2008 08:58:00
Thread-ID: 1030032
2 Beiträge
Labels u. TextBoxen in UserForm blinken lassen
Lenhard

Moin Excellianer!
Wie bringe ich in einem UserForm die Caption mehrerer Labels und den Hintergrund von TextBoxen (z.B. Gelb/Weiß im Wechsel) zum blinken, wenn in der TextBox1 ein Wert steht? Wenn in der TextBox1 kein Wert steht, dann soll es auch nicht blinken in den Labels und TextBoxen.
19.12.2008 17:16:00
Thread-ID: 1034201
21 Beiträge
Anzeige
differenz von konstanter und variabler zelle
konstanter

hallo zusammen,
brauche dringend hilfe von profis.
ich habe eine tabelle, in der ich wöchentliche zahlen von einer konstanten abziehen muß. das sieht ungefähr so aus, dass in zelle a3 eine konstante zahl habe und eine matrix mit wochen (c5;e5;g5;i5;k5 usw) für ca ein halbes jahr habe....
22.01.2009 21:45:16
Thread-ID: 1042742
5 Beiträge
Webabfrage und laufzeitfehler 1004
MBorn

Liebe Excel-Freunde,
ich bitte um Eure Hilfe. Ich bekomme bei einer (einfachen) Webabfrage dauernd, aber in
unregelmäßigen Abständen, die Fehlermeldung "laufzeitfehler 1004 - auf die Datei konnte
nicht zugegriffen werden".
Doch die Datei ist vorhanden und wird auch gefunden, w...
26.01.2009 17:26:00
Thread-ID: 1043962
3 Beiträge
6 Textboxen untereinander abstimmen
Andreas

Hi
Habe in einer Userform 6 Textbox für das ausfüllen (Anteilsinhaber) und 6 Textboxen für die
jeweiligen Anteile in %.
Diese Werte schreibe ich in eine Tabelle.
Da die Anteile zusammengerechnet nie über 100 % kommen dürfen, habe ich mit der Gültigkeit versucht, daß die einzel...
28.01.2009 21:00:27
Thread-ID: 1044723
16 Beiträge
Controltiptext für Label auf 2 Zeilen
Leon

Hi Leute
Habe gestern von Hajo und Tino gelernt wie man für ein Label ein Controltiptext erstellt.
Meine Frage:
Der Text ist ein wenig zu lang geraten und ich möchte es auf zwei Zeilen schreiben lassen.
Wie geht das?
Gruß
Leon
01.02.2009 19:19:00
Thread-ID: 1045969
14 Beiträge
Text in der Seitenansicht und im Druck
Sandra

Hallo zusammen,
hallo Thorsten - wenn Du da bist!
Ich weiß, ich habe versprochen eine Beispieldatei hochzuladen, aber in diesem Fall kann ich es nicht tun. Betriebsgeheimniss. Das Problem besteht nicht wenn ich den Text raus lösche und der Text darf halt nicht von der ganzen Welt gesehe...
04.02.2009 11:18:04
Thread-ID: 1046943
11 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
1
1
20
3
4
2
15
13
10
4
7
4
3
6
2
15
2
2
1
5
2
2
6
10