Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Excel Button

Frage Microsoft Microsoft Office

Mitglied: Florian86

Florian86 (Level 1) - Jetzt verbinden

30.12.2014, aktualisiert 14:09 Uhr, 861 Aufrufe, 5 Kommentare

Hallo,

https://drive.google.com/file/d/0BzQM-ZoFrfL8anhSYXVOQnYxeTg/view?usp=sh ...

kann ich wie im Download rot markiert per Button die Ziffern aller Leerzellen automatisch mit der
vorhergehenden füllen lassen?

Ist so etwas mit VBA möglich?

Mit freundlichen Grüßen

Florian86
Mitglied: Florian86
30.12.2014 um 13:46 Uhr
am Schluss steht immer Summe... dort könnt er dann aufhören....
Bitte warten ..
Mitglied: colinardo
LÖSUNG 30.12.2014, aktualisiert um 14:09 Uhr
Moin Flo,
z.B. so
01.
Sub FillWithLastValue() 
02.
    Dim ws As Worksheet, cell As Range, lastValue As Variant 
03.
    Set ws = ActiveSheet 
04.
    With ws 
05.
        For Each cell In .Range("A1:A" & .Cells(Rows.Count, 1).End(xlUp).Row) 
06.
            If cell.Value <> "" Then 
07.
                lastValue = cell.Value 
08.
            Else 
09.
                cell.Value = lastValue 
10.
            End If 
11.
        Next 
12.
    End With 
13.
End Sub
oder etwas effektiver so
01.
Sub FillWithLastValue() 
02.
    Dim cell As Range 
03.
    With ActiveSheet 
04.
        For Each cell In .Range("A1:A" & .Cells(Rows.Count, 1).End(xlUp).Row).SpecialCells(xlCellTypeBlanks) 
05.
            On Error Resume Next 
06.
            cell.Value = cell.Offset(-1, 0).Value 
07.
        Next 
08.
    End With 
09.
End Sub
Grüße Uwe
Bitte warten ..
Mitglied: Florian86
30.12.2014 um 13:50 Uhr
ok Danke ich probiere es aus..

Mit freundlichen Grüßen

Florian86
Bitte warten ..
Mitglied: Florian86
30.12.2014 um 13:54 Uhr
zu funktioniert es auch...

- Spalte komplett markieren
- F5 drücken
- [Inhalte..]
- Leerzellen
- =B1 eintragen (Bezug auf die Zelle über der ersten leeren)
- Mit STRG+Rerturn abschliessen

deine Lösung probiere ich trotzdem noch.

Mit freundlichen Grüßen

Florian86
Bitte warten ..
Mitglied: colinardo
30.12.2014 um 13:58 Uhr
yip so geht's natürlich auch, aber wenn du schon nach VBA fragst
Bitte warten ..
Neuester Wissensbeitrag
Internet

Unbemerkt - Telekom Netzumschaltung! - BNG - Broadband Network Gateway

(3)

Erfahrungsbericht von ashnod zum Thema Internet ...

Ähnliche Inhalte
Microsoft Office
gelöst Excel Makro - Button "Springe zu Zeile mit heutigem Datum" (5)

Frage von hannsgmaulwurf zum Thema Microsoft Office ...

VB for Applications
Excel VBA Sortierung von Daten (4)

Frage von easy4breezy zum Thema VB for Applications ...

Microsoft Office
gelöst Excel-Formel oder VBA (7)

Frage von nicki01 zum Thema Microsoft Office ...

Microsoft Office
Prüfung von Intervallen und Textausgabe in Excel (2)

Frage von traller zum Thema Microsoft Office ...

Heiß diskutierte Inhalte
Windows Server
Outlook Verbindungsversuch mit Exchange (15)

Frage von xbast1x zum Thema Windows Server ...

Microsoft Office
Keine Updates für Office 2016 (13)

Frage von Motte990 zum Thema Microsoft Office ...

Grafikkarten & Monitore
Tonprobleme bei Fernseher mit angeschlossenem Laptop über HDMI (11)

Frage von Y3shix zum Thema Grafikkarten & Monitore ...