WCM - Das österreichische Computer Magazin Forenübersicht
 

Zurück   WCM Forum > Rat & Tat > Software

Software Rat & Tat bei Softwareproblemen

Microsoft KARRIERECAMPUS

Antwort
 
Themen-Optionen Ansicht
Alt 28.03.2012, 21:03   #1
Atomschwammerl
Abonnent
 
Registriert seit: 04.09.2001
Alter: 39
Beiträge: 4.355


Atomschwammerl eine Nachricht über ICQ schicken
Standard Excel Tabelle wie funktion aufrufen

Hallo

Ich kann ja mit =WorksheetXX!J1 auf ein anderes Worksheet zugreifen.

Jetzt benötige ich aber die Resultate aus einem Anderen Worksheet für unterschiedliche Bedingungen.
Geht das irgendwie ohne die Gesamten Formeln aus dem Worksheet zu kopieren.

Danke!
____________________________________
\'I think I spider\'

Atomschwammerl ist offline   Mit Zitat antworten
Alt 29.03.2012, 21:14   #2
Atomschwammerl
Abonnent
 
Registriert seit: 04.09.2001
Alter: 39
Beiträge: 4.355


Atomschwammerl eine Nachricht über ICQ schicken
Standard

Ich habs nun doch mittels Macro gelöst.
Und Zwar Kopiert das Macro erst den Übergabeparameter ins Berechnungs Worksheet, und dann die Resultate zurück.
Ein Counter spring zur nächsten Zeile und wiederholt den schirtt mit dem nächsten übergabe Parameter.

Code:
Sub Makro1()
'
' Makro1 Makro


'
counter = 1
Range("F" & counter).Select




    For i = 1 To Range("B6").Value


original_sheet = ActiveSheet.Name

  
    'Jump to global
     Sheets("global").Select
    
    'Trigger Clock
    Range("B1").Select
    ActiveCell.Formula = "='" & original_sheet & "'!D" & i + 7
    ' Bitwidth
    Range("B2").Select
    ActiveCell.Formula = "='" & original_sheet & "'!B3"
    
    'Intermediate Bitwidth
    Range("B3").Select
    ActiveCell.Formula = "='" & original_sheet & "'!B4"




      Sheets(original_sheet).Select

'Select desired WDF Sheet
    Sheets(Range("C" & i + 7).Value).Select
    Range("E17:F17").Select
    'Copy Result
    Selection.Copy
    Sheets(original_sheet).Select
    
    'Paste Result
    Range("F" & i + 7).Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
        
    Next i
        
        
End Sub
____________________________________
\'I think I spider\'

Atomschwammerl ist offline   Mit Zitat antworten
Antwort


Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Gäste: 1)
 

Forumregeln
Es ist Ihnen nicht erlaubt, neue Themen zu verfassen.
Es ist Ihnen nicht erlaubt, auf Beiträge zu antworten.
Es ist Ihnen nicht erlaubt, Anhänge hochzuladen.
Es ist Ihnen nicht erlaubt, Ihre Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.

Gehe zu


Alle Zeitangaben in WEZ +2. Es ist jetzt 01:13 Uhr.


Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Forum SEO by Zoints
© 2009 FSL Verlag