Question

当我尝试使用以下命令安装python3-memcached时，

pip install python3-memcahed

它因以下错误输出而失败，

Collecting python3-memcached  
Using cached python3-memcached-1.51.tar.gz
Traceback (most recent call last):
  File "<string>", line 20, in <module>
  File "/private/var/folders/pl/5d9_g9ld38d9r_36fhqwzzb40000gp/T/pip-build-UuR8g9/python3-memcached/setup.py", line 4, in <module>
    import memcache
Complete output from command python setup.py egg_info:
Traceback (most recent call last):

  File "<string>", line 20, in <module>

  File "/private/var/folders/pl/5d9_g9ld38d9r_36fhqwzzb40000gp/T/pip-build-UuR8g9/python3-memcached/setup.py", line 4, in <module>

    import memcache

----------------------------------------
Command "python setup.py egg_info" failed with error code 1 in /private/var/folders/pl/5d9_g9ld38d9r_36fhqwzzb40000gp/T/pip-build-UuR8g9/python3-memcached

上述错误中指定的文件路径不存在。

仅供参考：我使用brew来安装python3

Answer 1

尝试以下（使用sudo）：

sudo pip3 install python3-memcached

对于python3包，最好使用pip3。如果您尚未安装，请输入：

sudo apt-get install python3-pip

Answer 2

如果您将来使用virtualenvs，那么如果您将virtualenv创建为：

Sub ImportData()
Application.ScreenUpdating = False
Dim Path As String, Lstrw As Long
Dim SourceWb As Workbook
Dim TargetWb As Workbook

Path = "C:\Users\DZPH8SH\Desktop\Status 496 800 semana 12 2015.xls"    'Change this to your company workbook path
workbook path
Set SourceWb = Workbooks.Open(Path)
Set TargetWb = ThisWorkbook

Dim n As Integer, targetRow As Long
targetRow = 3

With SourceWb.Sheets(1)
    Lstrw = .Cells.Find(What:="*", SearchOrder:=xlRows, SearchDirection:=xlPrevious, LookIn:=xlValues).Row
    .Range("M1:M" & Lstrw).AutoFilter Field:=1, Criteria1:="496"
    .Application.Union(.Range("D2:D" & Lstrw), .Range("F2:F" & Lstrw), .Range("I2:I" & Lstrw), .Range("M2:M" & Lstrw)).Copy
    TargetWb.Sheets(7).Cells(TargetWb.Sheets(7).Rows.Count, "A").End(xlUp)(2).PasteSpecial xlPasteValues
    .ShowAllData
End With

With SourceWb.Sheets(2)
    Lstrw = .Cells.Find(What:="*", SearchOrder:=xlRows, SearchDirection:=xlPrevious, LookIn:=xlValues).Row
    .Application.Union(.Range("D2:D" & Lstrw), .Range("F2:F" & Lstrw), .Range("I2:I" & Lstrw), .Range("M2:M" & Lstrw)).Copy
    TargetWb.Sheets(7).Cells(TargetWb.Sheets(7).Rows.Count, "A").End(xlUp)(2).PasteSpecial xlPasteValues
End With

SourceWb.Close savechanges:=False
Application.ScreenUpdating = True

'====================================== Search in the main file code below 

On Error Resume Next

Dim CurrWk As Worksheet
Dim wb As Workbook
Dim wk As Worksheet
Dim LRow As Integer
Dim myLRow As Integer
Dim myLCol As Integer
Dim F1 As Boolean
Dim f As Boolean

Set wb = ActiveWorkbook
Set CurrWk = wb.Sheets(7)

LRow = LastRow(CurrWk)

For r = 3 To LRow

    f = False

    For Each wk In wb.Worksheets

        If wk.Name = "Status" Or wk.Name = "Gráfico_2015" Then GoTo abc 'Exit For
        If wk.Visible = xlSheetHidden Then GoTo abc 'Exit For

        myLRow = LastRow(wk)
        myLCol = LastCol(wk)

        For r1 = 3 To myLRow
            For c1 = 1 To myLCol
                If Trim(CurrWk.Cells(r, 1).Value) = Trim(wk.Cells(r1, c1).Value) Then
                    f = True
                    F1 = False
                    If wk.Name = "ÄA" Then
                        For I = 12 To 18
                            If wk.Cells(r1, I).Value = 1 Then
                                CurrWk.Cells(r, 6).Value = wk.Cells(2, I).Value
                                F1 = True
                                Exit For
                            End If
                        Next I
                    Else
                        For I = 14 To 20
                            If wk.Cells(r1, I).Value = 1 Then
                                CurrWk.Cells(r, 6).Value = wk.Cells(2, I).Value
                                F1 = True
                                Exit For
                            End If
                        Next I
                    End If
                    If F1 = False Then CurrWk.Cells(r, 6).Value = "Set de equipa diferente"
                End If
            Next c1
        Next r1
        'If f = True Then Exit For
abc:
    Next wk

    If f = False Then
        CurrWk.Cells(r, 12).Value = "Não está presente no ficheiro"
    End If

Next r

Set wk = Nothing
Set wb = Nothing

On Error GoTo 0

MsgBox "Finished"

End Sub


Function LastRow(sh As Worksheet)
On Error Resume Next
LastRow = sh.Cells.Find(What:="*", _
                        After:=sh.Range("A1"), _
                        Lookat:=xlPart, _
                        LookIn:=xlFormulas, _
                        SearchOrder:=xlByRows, _
                        SearchDirection:=xlPrevious, _
                        MatchCase:=False).Row
On Error GoTo 0
End Function

Function LastCol(sh As Worksheet)
On Error Resume Next
LastCol = sh.Cells.Find(What:="*", _
                        After:=sh.Range("A1"), _
                        Lookat:=xlPart, _
                        LookIn:=xlFormulas, _
                        SearchOrder:=xlByColumns, _
                        SearchDirection:=xlPrevious, _
                        MatchCase:=False).Column
On Error GoTo 0
End Function

pip install python3-memcached失败

2 个答案: