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 2) - Jetzt verbinden

30.12.2014, aktualisiert 14:09 Uhr, 890 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?

MfG

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..

MfG

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.

MfG

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 ..
Ähnliche Inhalte
Python
gelöst Python GUI Button funktionen? (7)

Frage von Scuzzy zum Thema Python ...

Microsoft Office
Button für Wechseln zwischen den Tabellenblättern (6)

Frage von lupi1989 zum Thema Microsoft Office ...

Google Android
gelöst Samsung S8+: Bixby-Button (1)

Frage von honeybee zum Thema Google Android ...

XML
gelöst Kein automatisches Backup über Button VBA (2)

Frage von Knuefi zum Thema XML ...

Neue Wissensbeiträge
Entwicklung

Exploit Development

Anleitung von burhanudinn123 zum Thema Entwicklung ...

Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

(1)

Tipp von beidermachtvongreyscull zum Thema Windows Update ...

Viren und Trojaner

CNC-Fräsen von MECANUMERIC werden (ggf.) mit Viren, Trojanern, Würmern ausgeliefert

(4)

Erfahrungsbericht von anteNope zum Thema Viren und Trojaner ...

Heiß diskutierte Inhalte
Router & Routing
gelöst Linksys wrt1200ac v2 mit dd-wrt: keine vlan-einstellungen im GUI (15)

Frage von Pixi123 zum Thema Router & Routing ...

Netzwerkprotokolle
Leiten "dumme" Switches VLAN-Tags mit durch? (14)

Frage von coltseavers zum Thema Netzwerkprotokolle ...

E-Business
Wo tragt ihr eure privaten Termine ein? (13)

Frage von honeybee zum Thema E-Business ...

Windows Server
Terminalserver starten willkürlich neu (12)

Frage von thaefliger zum Thema Windows Server ...