"I have a number of address labels which are stored in table format in Word documents. I can't just save them as text files and then import them, because they import as one long record."

Open your labels in Word and save as as "Text Only" which yields a text doc with all of the names & addresses, but some have extra blank lines in-between, some have no blank lines in-between. The following code reads this text file and populates "Table1".

Layout of Table1

Line1	Text	50
Line2	Text	50
Line3	Text	50
Line4	Text	50

Standard Module

Sub GetText()
    Dim db As Database, rst As Recordset
    Dim s As String, x As Long
    Set db = CurrentDb
    Set rst = db.OpenRecordset("Table1")
    Open "c:\windows\desktop\app.txt" For Input As #1
    x = 0
    Do While Not EOF(1)
        Line Input #1, s
        If Len(s) > 0 Then
            ' something on that line. . .
            If x = 0 Then
            End If
            rst.Fields(x) = s
            x = x + 1
            If x > 3 Then
                x = 0
            End If
        End If
    Close #1
End Sub